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De retard en retard, et avec 
La fermeture des émprimertes, c'est 
en définitive à La date du n° 9 
que paraît ce n° 8. Nous espérons 
maintenant parattre à £a date. 


Pour compenser, et comme L'an- 
nonçait £a page du ler avu£& (ce 
n'en était donc pas un), vous avez 
un numéro plus gros et qui accueit- 
Le de nouvelles machines. 


Bienvenue aux Atartstes et 
driciens ! 


La Commode 4e déc£otisonne. 
Elle neste spécialisée mais n'est 
plus exclusive. Quelques éncondi- 
tionnels de Commodore seront un peu 
déçus, mais éls vermont vite que 
tous ont à y gagner. D'abord plus 
de Lecteurs, donc plus d'idées, et 
toute idée développée sur une ma- 
. ch£ne est ADAPTABLE à £a vôtre. 


Te Bien sûr, ce n'est pas {ou- 

jours tout cuit, mais rien d'effti- 
cace ne L'est. La Commode veut vous 
aider dans vos efforts, mais elle 
ne peut supprimer La nécessité des 
efforts. Nous essaierons, à chaque 
article, de montrer Les points où 
des besoins d'adaptations 4e $ont 
sentir et nous en donnerons Les £i- 
gnes directrices. À ce propos, {out 
Lecteur qui aura adapté un program- 
me d'une configuration à une autre 





ou d'une marque à une autre, est 
prié de nous envoyer 40h adaptation 
pour £e plus grand profit des au- 
tres Lecteurs. 
Maintenant, :y a-t'il tant 
d'adaptations que cela à gare ? 
Les Commodore, Atari et Ornic ont 
tous à peu près La même architec- 
ture (ils ont copié, quoi, y a pas 
de doute!) et ils utilisent tous Le 


6502 et beaucoup de concepts de 


Leur système et de Leur BASIC sont 
communs. Dans notre numëro 9, com- 
mencera notre cours d'Assembleux, 
commun à tous Les modèles. Il utt- 
Lisera une nouvelle cassette La 
Commode, L'Assembleur Universel. 


Pour que nos abonnés fidèles 
n'aient pas moins de pages consa- 
crées aux Commodore, nous sommes 
passés à 96 pages, pou une augmen- 
tation de prix bien moindre que Les 
50% de supplément d'informations. 
De plus, nous n'avions pas augmenté 
nn 2? ans, ce n'était plus tena- 

e ! 


La Commode vous promet d'être 
toujours plus niche et {toujours 
pêus utile. Le déc£otsonnement et 
L'augmentation du nombre de pages 
sont une étape dans cette voie. 


Daniel-Jean DAVID. 
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ELARGISSEZ 


L’'HORIZON 
DE VOTRE CBM 4000 


AVEC CP/MAKER 


CP/Maker se présente sous forme d’une carte à installer 
à l’intérieur du CBM offrant les possibilités suivantes 


. 64 K RAM supplémentaires accessibles en mode 6502 

. Microprocesseur Z-80 

. Système CP/M livre sur disquette format 4040 et 8050 
- comportant CP/M , Assembleur , Editeur de texte 


? 


Utilitaire PIP ( transferts entre périphériques ) 


Logiciels supplémentaires disponibles: 


M/BASIC C/BASIC 
BASIC Combpiler CB 80 
PASCAL MT- 
CISCOBOL etc. 


= 19-21 RUE MATHURIN-RÉGNIER - 75015 PARIS 
PROCEP TÉL : 306.82.02 - TÉLEX : 204 875 F. 


# Valable egalement pour CBM 8032 
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J'ai déja Les 6 premiers numé- 
nos de La Commode qui ont débrous- 
saitle quelques questions concer- 
nant L'utilisation de mon VIC 20. 
Hélas pas toutes, car 4£ me reste 
Les problèmes suivants : 


- Comment utiliser Les cartou- 
ches Programmer's Aid VICI212 et 
Moniteur Langage Machine-VIC1213 
avec Les extensions 8K RAM-VIC1110, 
Le commutateur de cette dernière 
étant dans La position (compatible 
avec £a 16K RAM) où 5e4 adresses 
mémoire vont de $6000 à $7FFF, Le 
tout branché sur L'extension "Argon 
Micro". Dans ce cas La commande SYS 
est inopérante, car £es adresses 
des VICI212 et 1213 sont dans Le 
domaine de £a ë8K RAM. Existe-t-il 
une astuce pour Les faire coexis- 
ten? 


- J'ai fait un programme en 2 
parties (faute d'extension mémoire 
à L'époque) dont La deuxième est 
appelée sur cassette à partir de La 
premtère. Comment, matntenant que 
tout peut tenir en mémoire, puis-je 
Les charger successivement pour 
n'en faire qu'un seul programme, 
sans réécrire complètement L'un des 
deux? Autrement dit comment charger 
deux programmes sans effacer Le 
premcen? 


Raymond DE LABARRE 
75017 PARIS 


1- La RAM &8K aux adresses 6000-7FFF 
est incompatible avec toute ROM à 
ces adresses. Une solution est de 
stocker Les ROM sur disque et de 
les charger en RAM quand vous en 
avez besoin. De toute façon elles 
ne peuvent pas coexister. 


2- La commande MERGE de PROGRAM- 
MER'S AID résout votre problème. Le 


second programme doit éventuelle- 
ment avoir été renuméroté. 


Notre club informatique est 
essentiellement tourné vers L'éni- 
tiation. D'une part avec des ren- 
contres hebdomadaires d'apprentis- 
sage avec moniteur, d'autre part 
avec des manipulations éndividuel- 
Les durant toute La semaine. Par 
ailleurs Le club désire apporter 
une participation plus active à £a 
vie de notre association, £a MLC- 
centre socio-culturel: gestion du 
fichier des membres, comptabilité, 
senvice de documentation sur Les 
mcro-cordinateurs . 

Nous possédons actueltement 2 
VIC 20 avec cassettophone, 2 exten- 
sions mémoire 3K, T1  {mprimante 
Seikosha GPS0M, 1 moniteur TV. 

Que nous proposez-vous, poux: 





1) Compléter notre matériel 
(disquettes  ..:.]. Existe-il une 
possibilité d'augmenter,sur Le VIC 
20, Le nombre de caractères par 
Ligne sun L'écran (22 c'est bien 
peu) ? 

2) Le remplacer par un maté- 
riel plêus performant et néanmoins à 
La portée de notre budget? 


Jean-Paul FRICKER 
Club £nformatique, MLC 
67500-HAGUENAU 


Les applications que vous ci- 
tez sont, à notre avis, traiïitables 
sur Le VIC si vous Le munissez d'u- 
ne disquette. 

La Largeur d'affichage est 
augmentable mais c'est coûteux. Je 
vous conseillerais La chose sui- 
vante: 

1- achat d'une unité de dis- 
quette, 

2—- démarrage de vos applica- 
tions sur VIC, 


A enr 








3- achat d'un Commodore 64 
(qui accepte Les mêmes disquettes). 
Transferts de vos applications sur 
Le 64 (ce qui devrait être immé- 
diat). Utilisation du VIC pour Les 
initiations. 





Vans Le courrier des Lecteurs 
du numéro 4, vous avez répondu à ma 
question sur Le brochage d'un 3016 
pour extension mémoire d'un 3008. 

Je tiens à compéèter votre 
réponse. 

I£ faut non seulement en£ever 
E et mettre F, mais: 

entever À, E, L, M, 
ajouter F, M, I, C. 

En mettant des 4116 à La place 
des 4108 on obtient 16K RAM. 

Ce n'est pas moi qui ait in- 


venté ce brochage, mais Le magasin 


“Informatique Center" Lille à qui 
fe dois cela et que fe tiens à ne- 
mercier ici. "Ils" ont été un des 
rares à népondre à mes nombreuses 
Lettres envoyées pour des nrenset- 
gnements sur L'extension mémoire. 

Je tiens à dire que 3 Lettres 
a Procep sont {toujours sans répon- 
4e. Menci L'émportateur! 


Ceci dit, voici un petit truc 
sur INPUT: 44 on fait INPUT A,B,C 
Le CBM népond "?" et attend 3 nré- 
ponses. Sx on fait RETURN, on 4014 
du programme (ça c'est bien connu), 
mais 44 on ne donne qu'une seule 
réponse, Le CBM marque ?? et attend 
Les autres. 

Ici, 44 on répond RETURN tout 
court, on ne 40€ pas du programme 
(0 par défaut), exactement comme £e 
VIC 20. Il neste à découvrir com- 
ment passer à La deuxième étape |?) 
sans passer par £a premtènre. Les 
INPUT seront donc protègés egftca- 
cement | un SYS ... sans doute). 

Ceci dit, pensez au 64, Le 
bien mystérieux engin. Le manque 
d'information est étrange... 


E. LEGENDRE 
21121 VAIX 


Ce numéro devrait étancher vo- 
tre soif d'information sur Le 64. 


* 
AR, 


Parmi vos projets ne pouvez 
vous inclure Le passage en 80 co- 
£onnes des 4000-G 7? C'est possible, 
f'y suis passé par mégarde quand 
j'ai fait L'extension 32 K. Seule- 
ment je n'avais plus, évidemment, 
que La moitié de L'écran en hauteur 
Î Naturellement, vu que £e BASIC 
n'est pas prèvu pour, À£ faudrait 
un inverseur [manuel ou à relais 
sur Le VIA) pour ne L'uti£iser que 
pour L'affichage pour £es grands 
tableaux par exemp£e. 

AVez-VOUS aussi AONGÈ à NOUS 
décrire un stylo Lumineux ? Ce pe- 
tit objet rendrait bien des 4envt- 
Ces. 


Jean-Paul LAURENT 
13010 MARSEILLE 


Le stylo lumineux a été traité 
dans Le numéro 7. 

La question des 80 colonnes 
sera traitée dans un prochain n . 


La naissance et Le dévelcppe- 
ment de votre nevue viennent enfin 
combler un grand vide dans £a pres- 
4e spécialisée française. Les Aru- 
briques régulières ou Les anticles 
consacrés à La gamme Commodore des 
magazines L'Ordinateur Individuel 
ou Micro-Systèmes sont, malgré Leur 
intérêt, insuffisants pour uh pos- 
sesseur de matériel Commodore. Le 
bulletin édité par Procep avait Le 
défaut d'émaner de L'importateur et 
donc de ne pas être suffisamment 
critique à L'égard du materiel et 
du logiciel. 

Permettez-moi avant de conc£u- 
re de recommander aux Lecteurs de 
La Commode deux programmes d'onrigi- 
ne américaine que j'utilise négu- 
Lièrement et dont Le rapport quali- 
4é/prix est excellent. Le premcer 
est un programme de gestion de 
fichier "Simply File" (prix: 65 
Livres anglaises soit environ 750 
FF), Le second est un programme de 
traitement de texte qui a L'avanta- 
ge de pouvoir fonctionner sur Cas- 
sette et/ou sur disquette ‘Simply 
Write" (prix 40 Livres sun cassette 
et 45 sur disquette, soit nespectt- 
vement environ 460 FF et 520 FF). 
Ces deux Logiciels ne sont pas, à 


CASA 


us 





ma connaissance, distribués en 
France. On peut Les commander au- 
près de La maison : 


SIMPLE SOFTWARE LTD 

15 Havelock Road 
BRIGHTON SUSSEX BN1 6GL 
GRANDE BRETAGNE 


Le directeur de cette S.C.I., M. 
Brian Tregar, applique des règles 
de commerctalisation qui mértie- 
rnaient Les félicitations de £a plus 
sévène des organisations de consom- 
mateurrs . 






Musique 


Informaticien de Loisir, novi- 
ce, 4seut à La campagne, possesseur 
récent d'un CBM 4016 G.Ecran, je 
suis bien sûr congronté à de nom- 
breux problèmes. Je vous en soumets 
un : 

Voutant apprendre La musique à 
cet outil, j'ai décidé que £a ran- 
gée des touches inférieures serait 
Les notes (do,ré,mi,etc,). Celle 
immédiatement supérieure Les diè- 
zes. Connaïssant La valeur du PEEK, 
des touches pressées (en faisant : 


10 P = PEEK (151) 

20 GET A$ 

30 IF A$ = " " THEN 10 
40 PRINT P : GOTO 10 


IL suggit alors de rentrer Le pro- 
gramme suivant : 


10 P = PEEK (151) 

20 J = 59464 

30 IF P.= 90 THEN I 242 (do) 
GOSUB 1000 

40 IF P = 88 THEN I = 215 (ré) 
GOSUB 1000 

etc pour toutes Les notes. 


1000 : POKE J + 3,16 
2,15 : POKE J, I : RETURN. 


nu 


POKE J + 


Hélas, (trois fois) 54 L'ondi- 
nateur accepte bien de jouer toutes 
Les notes programmées avec 40h pe- 
tit haut parteur interne et change 
bien de note en fonction des {ou- 
ches programmées, 4£ nefuse de ne- 
connaître que La touche n'est plus 
pressée et La dernière note contt- 
nue éindëginiment..., J'ai dû ajou- 
ter en 999 : IF P = 32 THEN POKE 


59467, 0 : GOTO 10 pour que £a tou- 
che ‘'espace" arrête Le son. 

14 doit bien y avoir un moyen 
pour que Le son programmé commence 
quand on appuie sur une {touche et 
s'arrête quand on £a Läche. Ouk, 


mais Lequel ? 
Paul BOULAY 
32130 SAMATAN 


La solution de votre problème 
est très simple. 

Trouvez La valeur X du PEEK 
(151) Lorsqu'il n'y a pas de touche 
enfoncée à l'aide du programme : 


10 ?PEEK(151) : GOTO10 


Normalement, c'est X = 255 
Ajoutez alors à votre programme : 


25 IF P=X THEN POKE 59467,0:GOTO 10 


(Remarque : si à chaque Ligne de 
votre programme vous ajoutez un : 
GOTO 10 derrière Le GOSUB 1000, 
vous améliorerez Le temps . de 
réponse) 








ai »] 


Je suis débutant, j'ai acheté 
un VIC 20 et j'aimerais faire un 
petit programme basé sur Les nom- 
bres aléatoires; j'ai 20 étalons et 
je voudrais en choisir trois, je ne 
sais comment élaborer £e programme. 


Victor TOURRE 
83100 TOULON 


Autant que nous comprenions 
votre problème, il s'agit de tirer 
au sort, parmi 20, Les trois numé- 
ros Ni: N2 et N3 des étalons que 
vous voulez choisir. La solution 
est alors très simple : 


N1 = 1 + INT (20 x RND (1) ) 
N2 = 1 + INT (20 x RND (1) ) 
=N3 = 1 + INT (20 x RND (1) ) 


Vous pouvez vérifier Les numéros 
obtenus par ? N1, N2, N3. 

Si de plus N1, N2 et N3 doivent 
être différents, vous devez repren- 
dre Le calcul de N2 tant que N2=N1, 
et vous devez reprendre celui de N3 
tant que N3=N1 OU N3=N2. 


k 
k x 


CC Cnsntins 














70 


Un manuel 8050 ? 


Je vous serais très neconnats- 
sant de bien vouloir m'indiquer 
s'Al existe un manuel concernant 
L'unité de double disquette modèle 
8050 Commodore. 


Philippe BOUCHET 
86180 BUXEROLLES 


A part quelques renseignements 
qu'on peut trouver dans La Commo- 
de,l'unité CBM 8050 est traitée 
dans Le Livre de PROCEP Manuel de 
L'utilisateur du CBM 8001 (éditions 
Radio) et dans D.J. DAVID Pratique 
du PET/CBM vol. 1 périphériques 
et gestion de fichiers. (Ed. du 
PES) 


Plus de 255 caractères 
programmables 


Je vous écris "en urgence", 
car j'ai un problème que je n'avui- 
ve pas à résoudre. Possesseur d'un 
VIC 20 avec extension 16 K, je 
réalise une Etude sur Le Languedoc- 
Roussillon puis Le Gard, en utibli- 
sant abondamment Le graphisme haute 
résolution pour Le racé des cat- 
4es, diagrammes, etc., Je n'ai pas 
eu de problèmes jusqu'au jour où 
j'ai dépassé 255 caractères . Je 
procède comme L'éndique PROCEP en 
réorgantsant La partition mêmoire 
en ramenant £a RAM écran en 7680 et 
£a RAM couleur en 38400. Ceci me 
Laisse donc pour La haute nésolu- 
Lion La possibilité de ne 448 
caractères (de 4096 à 7680 
; Bien entendu, comme Les cartes 
visualisées sont accompagnées de 
caractères  alpha-numériques, je 
conserve systématiquement Les 128 
premiers caractères du générateur 
(de 4096 à 5119). 

Question Comment faire pour 
appeler Les caractères, par mo“ 
déginis, dont Le numêro est au-delà 
de 255...jusqu'a 448 (POKE 7800, x 
avec x 255 11) 


Roger BOUISSET 
30000 NIMES 


Des éléments de réponse à vo- 
tre question ont été donnés dans La 
Commode n° 5 p.35. 

On ne peut pas définir plus de 
256 caractères programmables, puis- 


que Le code doit tenir en un octet. 
Mais vous pouvez couvrir tout lL'é- 
cran en appliquant La technique du 
doublement des mailles esquissée 
dans La Commode n°5, p2256: 


17 questions 


Je possède un VIC 20 version 
de base + magnèto depuis presqu'un 
an et demi et me trouve un peu b£o- 
qué. Ne parêons pas du manuel d'u- 
Lilisation (en anglais au moment de 
L'achat) qui est surtout un B.A.BA. 
Heureusement, ££ existe : La décou- 
verte du VIC de Daniel-Jean DAVID 
(que je salue au passage), Livre 
extrèmement bien fait, qui remplace 
avantageusement Le manuel d'auto 
formation basic (75 FF au Lieu de 
250 FF environ) mais qui Laisse sur 
sa faim vers La fin. À ce sujet, £& 
y aura de quoi dévorer dans Le cou- 
rant du 1er trimestre 1983. La sui- 
4e est à paraître. Du même auteur, 
même collection (P.S.I). En atten- 
dant, je souhaiterais des nrenset- 
gnements sur certains points : 


1 - Pourriez-vous publier un schèma 
de principe imprimé et un 
schéma d'implantation du VIC 
20: 


2 - Pourrutez-vous publier une Liste 
des adresses et de Leurs 
agt{ectations complete et dans 
L'ordre (voir n°3 et 4 de La 
Commode) . 


3 - Pourriez-vous aussi publier une 
Liste des commandes Basic et 
Langage machine. 


4 - Comment accéder au Langage 
machine? 


Mal 
l 


Quelles sont Les possibilités 
du VIC en traitement de texte 
et éditeur ? 


De plus, certains points ne4- 
tent obscurs : 


6 - Est-il possible d'effacer un 
programme sans effacer Les 
variables précédemment incré- 
mentées par ce programme? 


7 - Comment effacer une Longue 
partie d'un programme sans 


PAT ES 


taper Les n°° de Lignes un 
par un suivi de RETURN ? 


8 - Est-il possible de charger un 
programme à La suite d'un 
autre sans effacer Le premcex. 
S4 oui, comment ? 


9 - Est-ce qu'un programme peut 
travailler sur un autre 
programme (renumérotation, 
par exemple) ? 


10 - Peut-on travailler sur Les 
messages d'erreurs ? Quels 
sont Leurs codes particuliers? 


11 - Est-il possible d'éndicer une 
variable alphanumérique dans 
un ordre INPUT exempêe (INPUT 
A$ (I) ) et dans L'affiimative 
est-il correct de faire 100 
A$ (I + N) = B$ ? 


12 - Est-il possible de génërer des 
caractères ? Si oui, comment ? 


15 - Et, enfin, est-il possible de 
faire défiler L'écran vers £a 
auche, la droite, Le haut, Le 
as, à volonté ? 


14 - Pourriez-vous donner une Liste 
des Logiciels disque,cassette 
et cartouche existants où à 


venir ? 
15 - À quoi correspondent Les 
instructions  : 
10 A = B AND 7 
10 A =8B:A = 7 7? 


16 - D'ondne plus général, quelles 
sont Les différences entre Le 
VIC 20 et VIC 40 ? 


17 - De plus, j'ai Lu dans La revue 
ECHOS SINCLAIR, page 22, que 
SINCLAIR va commercialiser un 
Lecteur de mini-disquettes 
d'une capacité de 100 K octets 
pour environ 600 FF. Etes-vous 
au fait d'un te£ système ? 
Sera-t-il compatible avec Le 
VIC ou d'autres matériels COM- 
MODORE ? Quelle est La politi- 
que de COMMODORE au sujet du 
développement de petits systè- 
mes personnels ? 


Péerre FREMION 
75013 PARIS 


1 - Seul COMMODORE est en droit de 
publier un tel schéma. 


2 — Nous n'avons pas mieux que Les 
Listes publiées dans Les Nos 3 
et 4. Il y aura de plus en 
plus d'exemples d'utilisation 
dans La Commode. 





3/4 - cf. La Découverte de VIC et 
La Pratique de VIC vol.II qui 
va bientôt paraître. 


5 - IL existe plusieurs systèmes de 
traitement de texte sur VIC. 
PROCEP en importe un, voyez 
ses distributeurs. 


6 - Impossible. 


7/8/9 - Résolu par Programmers's 
Aid. 


10 - Un message d'erreur est impri- 
mé par chargement dans X du 
numéro de l'erreur et appel 
d'un sous-programme général 
d'impression du message. 


1HAROUN 


12 - Oui. Voyez, entre autres, Vic 
à Brac du n°7. 


13 - Haut / bas, facile 
Droite/gauche, très difficile 
(beaucoup plus facile sur 64) 


14 - Voir catalogue PROCEP pour 
ceux qui existent. Pour Les 
autres, demandez au Professeur 
PHAK-KHIR. 


15 - La 1ère isole Les bits O0 à 3 
de B (reste de La division de 
B par 8). 
La 2ème Ligne transfère B dans 
puis donne à A La valeur 7. 


16 - Le VIC 20 existe; pas Les 
autres. 


17 - IL existe une interface VIC 
imprimante SINCLAIR dont nous 
parlerons bientôt plus longue- 
ment. La même chose peut se 
faire sur Les disques. 
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Visite au PET SHOW 
Le 4ème PET SHOW s'est déroulé à Londres du 9 au 11 juin. 


= à 


Pot : gs 3 Fe 
nn 4 EL 














pour voir les logiciels... 


.. et les nouveaux matériels 
Commodore. 


le 64 portable 
le moniteur couleur 
le 8000 SK 

le 700 
l'imprimante 6400 
la 8250 bas profil 


gros plan sur le clavier, 
12 Se eee la poignée, l'unité de disques. 


PR IST: 






Une imprimante plus performante 
pour le 64 : la 1526 





L'imprimante traceur 1520 pour VIC 
et 64 





L'unité 8250 bas profil : 
une forte capacité pour un faible 
encombrement. 





413 
AN 
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Des systèmes de traitement de 
textes  : SUPERSCRIPT avec la 
nouvelle imprimante à marguerite 
CBM 6400... 


La plus grande Leçon de ce PET 
show est l'incursion que fait Le 64 
dans Le domaine des applications 
professionnelles. IL semble d'ail- 
Leurs que Les développeurs de logi- 
ciels écrivent simultanément Leurs 
programmes pour 7/00, 8000 et 64. 
C'est Le cas de SUPER BASE de SUPER 
SCRIPT et de CALC RESULT. 

Un autre élément est l'arrivée 
de nouveaux logiciels de traitement 
de textes très intéressants, notam- 
ment ED et SUPER.SCRIPT. A quand 
leur francisation ? SUPER SCRIPT se 
couple à SUPER BASE pour former 
SUPER OFFICE, non concurrent dange- 
reux de SILICON OFFICE. 


Le 700 : de face ... 


--.. et de profil 


Li 
0% 5 me Be PR RE 1771 Se } 
LR EN R | 


{ ESENE à : 
PAS PUS "1 1 Lili Ds hi 
BE uS re Men D'ESE 


| MAÉ En 1 his 


En O0 AN ST TE jee m7 


DAS DIVRIA De AUBIN MSA RETURN PS M2 


Sn) £ me mrm 
RP où mme vg 


ne RUE Su € a 58 em 


ne En LE : 


HS NS Do VS ET NE À 


Lu 


“ai 


Fe tr move suc PR 2 1 Diese ee UM 
Buse min © nue) pen” 


Jet mED qui edurait P 
servir pour l'éditorial dun 


Au point de vue hardware, 
gros intérêt des visiteurs pour Le 
64 portable, que nous annoncions 
déjà dans notre numéro précédent. 
Sinon, plus un mot du MAX, La 
machine qui devait compléter La 
gamme vers Le bas. Le VIC en est 
tout ragaillardi et, contrairement 
à ce que disent certains de nos 


confrères, nous ne pensons pas 
qu'il soit arrêté de sitôt, ce 
qu'il risquait beaucoup plus s'il 


avait dû être en sandwich entre Le 
MAX et Le 64. 


Daniel-Jean DAVID. 
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. 10 GET RS : 
donne pour L'apostrophe une 
9ILLEGAL QUANTITY ERROR IN 10 
alors que PRINT ASC ("'" FER) 
donne bien 39. 











PRINT R$,ASC CR$) 


. TAB (x) 


- jusqu'à x = 13 début impres- 
sion sur 1ère colonne du texte 
ensuite, début à x-13, 

- tabulations successives fantai- 
sistes, ex = 
PRINT TAB(15)'1"TAB(20) "2" 
TAB(25)'3" TAM(30)''4" donne 
1 en col. 2, 2 en col. 10, 

3 en col.23 et # en col. 3 de 
La Ligne suivante. 


Utilisez plutôt SPC qui, elle, 
marche bien. : 


IL existe 2 caractères ASCII non 


mentionnés : 


126 = He (par POKE ou CHR$) 


127 = 5 (par POKE seulement ou 
par CHR$(255) 


(également code ASCII de DEL) 


_ à noter aussi c, code ASCII 96 
qui ne peut être obtenu au cla- 
vier, mais par POKE ou PRINT 
CHR$S (96). 


En cas de répétition d'un carac- 
tère obtenu avec SHIFT on peut 
relâcher cette touche après La 


première impression ; on reste en 
mode shifté. 


. Un conseil : pour toutes Les ins- 
tructions ayant une action sur La 
mémoire (CPOKE, PEEK, PLOT, etc...) 
donner des valeurs en hexa et non 
en décimal, temps d'exécution dans 
Le rapport 1 à 1,7. 


. Le dernier argument des fonctions 
graphiques, appelé FD (fond-devant) 
peut prendre Les valeurs 0-1-2-3 : 


O0 = couleur du fond (papier) 
1 = couleur du devant (encre) 
? = couleur inversée 

3 = pas de couleur 


En fait, 2 produit La même action 
que 1. 


. IL y a dans La table des mots 
clés 2 instructions : 
- INVERSE, 
- NORMAL, 
qui à l'exécution donnent : 
SYNTAX ERROR 222? 


Jean RENAUD 





L'ORIC a deux vitesses de ges- 


tion de La cässette 2400 bd et 
300 bd pour une fiabilité accrue. 


ln à 


Si un chargement n'arrive pas 
à se faire, vérifiez : 


a) La commande utilisée : 
CLOAD''"" pour 2400 bd, 
CLOAD''",S pour 300 bd. 


On ne peut Lire à une vitesse 
un programme écrit à l'autre 
vitesse. 


b) Le branchement utilisé, 
revérifiez avec Le manuel (p 7). 


c) Le ‘règlage du volume. En 
principe, L'optimum est à 3/4 du 
maximum, mais il faut faire des 
essais (c'est l'ennui de lL'utili- 
sation des magnétos ordinaires). Si 
Le niveau est trop bas vous pouvez 
avoir Le diagnostic LOAD ABORTED. 
Si Le niveau est trop haut, vous 
pouvez avoir des lignes de U au 
lieu du programme. 


Rappelons que Le magnéto uti- 
lisé n'a pas besoïin d'être HIFI. 

Pour Le nom, utilisez des “ et 
non des ‘. 





Si VAL renvoie 0, c'est qu'il 
y a un caractère de contrôle illé- 
gal dans La chaîne (codes de 0 à 
SIDE 





Elle ne met pas automatique- 
ment à jour La position du curseur. 
En cas de besoin, utiliser CURSET 
après Le FILL. 


POKE HEXA 


La donnée à écrire par POKE ne 
peut être en hexadécimal (#...). 
C'est un manque de cohérence car 
l'adresse peut l'être. 





On ne peut pas charger un pro- 
gramme machine à partir d'un 
programme BASIC. 


IL faut d'abord protéger La 
zone mémoire de BASIC par La com- 
mande HIMEM. 


De même, si vous utilisez Le 
jeu de caractères auxiliaire, pro- 
tégez-le de BASIC par HIMEM #9FFF 
au début de votre programme. 





La fonction GET doit être 
employée uniquement avec une varia- 
ble chaîne de caractères : elle 
prendra un caractère. Mais ce n'est 
pas une saisie au vol : GET 
attendra La venue du caractère. 


Pour La saisie au vol, uti- 
Liser La fonction KEY$. 





L'interface Centronics envoie 
La séquence retour-chariot + ali- 
mentation-ligne. Si L'alimentation 
Ligne est de trop, elle doit 
pouvoir être inhibée sur L'impri- 
mante. 





Elle permet La saisie au vol 
de caractères. Si vous maintenez 
l'appui sur une touche, La fonction 
ne décèlera qu'un appui : elle dé- 
cèlera un second appui au bout du 
délai de répétion de caractères. 

Donc, si vous voulez faire une 
cascade de tests, il faut faire : 
10 A$ = KEY$ 20 IF KEY$ = .. 
20 IF A$ = ..et non 30 IF KEYS = 
30 1F A$ Fe L 


Honoric de BALSA 
(pseudonyme un peu ... léger) 
(c'est promis, on n'en fera plus!) 








La nouvelle ligne de produits ATARI s'appelle XL. 
Elle sera formée au départ du 1200 XL et du 600 XL. Le 
1200 XL est déja apparu aux Etats Unis. Il y aura ensuite 
les 800 XL, 1400 XL et 1450 XL. 


La nouvelle série de micro- 
ordinateurs ATARI s'appelle XL. On 
en connaît 2 membres, Le 600 et 
-seul sorti actuellement aux U.S.A.- 
Le 1200. La nouvelle série se carac- 
térise par une compatibilité logi- 
cielle complète avec Les 400/800. 


Le 1200 XL est un développement 
du 800. IL apparaît comme un concur- 
rent du 64. Nous ne connaissons pas 
son futur prix en France. En tous 
cas, c'est, lui aussi, une machine 
de 64 K de RAM, toujours à 6502, 
donc son architecture ne peut qu'ê- 
tre semblable à celle du 64 et de 
L'ORIC (cf. dans ce numéro l'article 
sur l'architecture du 64) : une par- 
tie des 64 K de RAM est occultée 
pour laisser place à La ROM et aux 
E/S. Les différences se font au ni- 
veau des détails sur La façon d'ef- 
fectuer cette occultation, pas au 
niveau des principes. 





>) T ÿ 
L'aspect général de L'ATARI 
1200 XL est, à notre avis, très amé- 
Lioré par rapport au 800 qui fait un 
peu massif mais est très robuste. Le 
1200 est très fin, très plat. Les 
fentes d'aération sur Les côtés sont 
fictives : elles donnent un aspect 
APPLE dont nous ne comprenons pas La 
raison. 


Le 1200 XL présente un ‘clavier 
équivalent dans sa fonctionnalité à 
celui du 800, mais des améliorations 
ont été apportées sur l'emplacement 
de certaines fonctions et certaines 


touches ont été ajoutées : il y a 
maintenant 56 touches classiques 
plus 11 touches spéciales au-dessus 
du clavier. 


Les 11 touches spéciales com- 
prennent : 


— Les 4 touches RESET, START, SELECT 
et OPTION qui étaient à part, à 
droite du clavier du 800, 


— 4 touches de fonction F1 à F4, Les 
touches ‘vidéo inverse" (ATARI) et 
BREAK qui étaient incorporées au 
clavier du 800. Nous approuvons Le 
fait que ces touches -dont La fonc- 
tion est très spéciale- aient été 
mises à part. 


- La touche HELP, qui est nouvelle. 
Elle a deux fonctions : 


. elle peut servir à afficher des 
instructions dans un programme, 
sur demande d'un utilisateur 
en détresse 


. elle sert de touche de diagnos- 
tic, lançant un programme qui 
vérifie Les connexions et Le 
fonctionnement des principaux 
sous-ensembles. 


Les touches de fonction ont des 
rôles très intéressants : 


. l'une d'elles met Le clavier en 
mode européen‘, ce qui permettrait 
facilement d'avoir un clavier 
AZERTY. Avis aux auteurs de systèmes 


ARS 


de traitement de textes. 


. une autre désactive Le clavier 
ce qui évite qu'un programme ne soit 
troublé par une frappe intempestive, 


. une autre désactive l'affichage 
ce qui évite l'usure du tube si La 
machine reste longtemps inactive. Le 
400/800 obtenait Le même résultat en 
changeant Les couleurs Lorsqu'on 
restait Longtemps sans taper. 


L'organisation du clavier prin- 
cipal a été améliorée. Les deux 
SHIFT sont larges. Les touches CRTL, 
TAB, ESC, CAPS/LOWER et DELETE/BACK 
SPACE ont été élargies. Les touches 
de mouvement de curseur agissent 
maintenant sans CTRL (une sérieuse 
amélioration). 


L'appui sur Les touches n'est 
plus accompagné d'un signal sonore, 
ou plutôt, il est produit par La 
télé, donc on peut l'atténuer. En 
plus du voyant ‘sous tension”, 3il y 
a deux voyants supplémentaires : 
“clavier inhibé'' et ‘'mode européen. 





IL n'y a plus qu'un emplacement 
pour cartouche de ROM (comme Le 400, 
alors que Le 800 en a deux) et ïl 
est maintenant sur Le côté : il est 
vrai qu'il n'y avait eu qu'une car- 
touche produite pour aller dans Le 
second emplacement. 


De même, Le nombre de connec- 
teurs pour poignées de jeu a été 
réduit de 4 à 2, ce qui est suffi- 
sant alors que Les 4 étaient un peu 
superflus encore que certains jeux 
ATARI Les utilisaient. Noter que Le 
64 est à 2 connecteurs de jeux lui 
aussi. 


Les possibilités de couleurs et 
de sons des 1200 XL sont identiques 
à celles du 400/800. 
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Une nouvelle ligne de périphé- 
riques est en développement. Ils 
seront compatibles avec Le 400/800 
et ils auront une interface 1200 
intégrée de telle sorte que Le modu- 
Le d'interface 850 qu'il faut avec 
Le 400/800 n'est pas nécessaire. 


Parmi ces périphériques, Le 
magnétophone 1010 (Le 410 recondi- 
tionné), l'imprimante 80 colonnes 
1025 et Le traceur-imprimante 40 
colonnes en couleurs 1020. 





L'ATARI 1200 XL semble donc un 
système séduisant d'autant qu'il 
sera accompagné de logiciels nou- 
veaux ou anciens réécrits, très a- 
daptés aux applications domestiques: 
jeux, finances familiales, traite- 
ment de textes et apprentissage 
musical. 


Daniel-Jean DAVID 


Abonnez-vous à La Commode 





est le premier 
appelons "Trio". Dans chaque article de cette série, on 
prend un problème général et on compare comment ce pro- 
blème est traité par les trois marques Commodore, Atari et 
Oric. Le premier article de la série concerne l'accès à 
l'horloge temps réel. Les suivants regarderont la saisie 
de caractères au vol, la modification d'un programme par 
lui-même, l'accès au Langage-Machine par Basic, le posi- 
tionnement sur l'écran etc... Ces articles, il va sans 
dire, seront très précieux pour adapter un programme d'une 
machine à une autre sans se limiter à une traduction mot à 


d'une série que nous … 





mot. 





L'horloge temps réel fonction- 
ne à peu près de La même façon dans 
Les trois marques. Le système est. 
comme on dit, commandé par inter- 


ruptions périodiques : tous Les 
soixantièmes de seconde. Le proces- 
seur est interrompu: il abandonne 


temporairement sa tâche (qui est en 


principe de s occuper de votre pro- 
gramme) pour exécuter des tâches 
système, notamment examiner Le cla- 
vier et gérer l'horloge. Gérer 
l'horloge consiste tout simplement 
à incrémenter une case mémoire (en 
fait plusieurs car il faut plus de 
8 bits ). On voit que toute consul- 
tation de ces cases mémoire (par 
PEEK) donnera Le nombre d'interrup- 
tions exécutées depuis La mise sous 
tension ou La dernière remise à 0 


des mémoires, donc une valeur pro- : 


portionnelle au temps écoulé. 


Les Commodore et L'Atari uti- 
lisent trois cases mémoire, qui 
sont incrémentées. L'Oric utilise 
deux cases mémoire et elles sont 
décrémentées, 


Voici Les adresses : 


poids poids Le plus 

faible fort fort 
PET 5114/5202 513/$201 512/$200 
CBM 143/$8F 142/$58E  141/$8D 
VIC/64 162/$A2 161/$A1 160/5$5A0 
-ATARI 20/$14 19/513 18/$12 


ORIC 630/$276 631/5277 = 


On remarquera que Les Commo- 
dore et Atari n'obéissent pas ici à 
La succession habituelle poids fai- 
ble...poids fort. 






Vous n'avez en fait jamais à 
accéder aux cases mémoire citées 
car vous disposez sur Commodore de 
deux variables réservées TI et TIS$. 
TI est Le compte des soixantièmes 
de seconde : tout se passe comme si 
TI=PEEK(162) +256xPEEK(161)+4096% 
PEEK(160) 


TI$, elle, donne L'heure sous 
forme de chaîne de caractères au 
format HHMMSS,. 






On initialise un compte de 
temps à O par TI$=''000000" 


On ne peut pas faire TI=0. 
En revanche on pourrait faire Les 
trois POKE adresse,0 . 


Dans l'utilisation de TI, ne 
pas oublier qu'on a Le temps en 
60iè de seconde, donc faire TI/60 
pour avoir des secondes et TI1/3600 
pour avoir des minutes. 





La gestion se fait obligatoi- 
rement par PEEK aux adresses, On 
aurait pu penser faire un : 

DEF FNTI=PEEK(20)+256xPEEK(19)+ 
4O96*PEEK(18) 


Ce 





mais DEF FN n'existe pas sur Atari! 
IL faut donc faire Les PEEK. 


Les choses peuvent se simpli- 
fier en fonction des problèmes à 
traiter. On peut ne pas avoir des 
temps trop Longs à gérer et ne pas 
avoir besoin du temps au 60ème de 
seconde, 


Si L'on néglige Le PEEK(20), 
PEEK(19)+256xPEEK(18) donne Le 
temps en groupes de 4 secondes 
€ 256 fois un soixantième ). 


Si L'on néglige Le PEEK(18), 
on ne pourra compter que 256x4 se- 
condes soit un intervalle d'environ 
1000s = 20mn. Le temps en minutes 
sera PEEK(1/15. Le temps en minutes 
sera PEEK(19)/15. Le temps en se- 
condes sera 4xPEEK(19). 






La mise à zéro pour un inter- 
valle se fait par Les trois POKE, 
Le seul POKE 19,0 si l'on ne garde 
que cette case. 


Pour mettre à une heure du 
jour, il faut convertir cette heure 
en groupes de 4 secondes et en 
groupes de 1000 secondes et faire 
Les POKE correspondants : 


Ex. H heures, ,M minutes, S secondes 
On convertit Le tout en secondes 
par  SS=S+60xM+3600xH. Les ‘quatre 
secondes ‘’ sont @Q=SS/4,. D'où 
T8=INT(Q/256) et T9=Q-256xT8 


Enfin POKE 20,0 : POKE 18.T8 
: POKE APTOU 
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Comme il y a décomptage, le 
temps en soixantièmes de seconde 
est 65535-(PEEK(630)+256*xPEEK(631) 
ou plutôt, puisque l'Oric dispose 
du ‘'PEEK double" qui s'écrit ‘'DEEK" 
T1=65535-D0EEK(630) 


On peut parfaitement faire : 
DEF FNTICX)=65535-DEEK(630) 

Le temps en secondes est : 
DEF FNSCX)=FNTIC(X) /60 

et celui en minutes est : 
DEF FNACX)=FNS(X)/60 . 

«Rappelons La Limitation à des 
intervalles de 20 mn environ ce qui 


interdit toute gestion de l'heure 
dans La journée qui ne soit pas 
très lourde votre programme doit 


déceler Les passages à 0 toutes Les 
20 mn et Les compter. 





Vous faites deux POKE ...,255 


ou plutôt : 


DOKE 630,65535 
pour initialiser Le temps écoulé à 
0. 







L'horloge temps réel est im- 
portante pour beaucoup d'applica- 
tions : petits intervalles pour Les 
jeux, heure du jour dans certains 
contrôles de processus. Nous avons 
vu Les techniques à employer dans 
Les trois marques. . 





Rappelons une limitation : 
comme La gestion des cassettes dé- 
tourne Les interruptions (et d'au- 
tres périphériques peuvent Le faire 
aussi ), l'heure devient inexacte 
après une entrée-sortie cassette 
(ou autre éventuellement ). IL sem- 
ble que, sur Oric, l'horloge soit 
aussi perturbée par l'instruction 
WAIT. Le 64 semble plus à l'abri 
puisqu'il a un boîtier, Le 6526, 
qui gère l'horloge temps réel. 


Daniel-Jean DAVID 
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SEDERMI (société éditrice de LA COMMODE) présente un ensemble de cartes 
d'extensions pour Le VIC, caractérisées par un rapport qualité/prix sans 
concurrence. En préparation, systèmes de cartes pour 64 et ORIC. 

Ce sont : 


a —- Les cartes EXTVIC-BUS 4 
qui permettent de connecter simultanément 4 
cartouches ou extensions à votre VIC, par exemple VICMON, 
PROGRAMMER'S AID,SUPER EXPANDER et une extension mémoire, 
ou toute autre combinaison. 

La carte EXTVIC-BUS 4 existe en 3 options : 

- N La carte montée et testée, avec alimentation par 
Le VIC: c'est l'option normale. 

— E Comme N, mais alimentation extérieure (non 
fournie). Cette option est utile pour certaines extensions 
d'entrées-sorties et applications particulières. 

— S Permettant, grâce à 4 interrupteurs d'activer La 
cartouche voulue 
et ainsi d'avoir 4 cartouches de jeu ou Super Expander 
montées en permanence. 


b —- Les cartes EXTVIC-VIA 2 
qui procurent 40 Lignes  d'entrées-sorties 
supplémentaires (idéal pour commander des appareils 
domestiques, des trains électriques etc. ) 
Chaque carte contient deux VIA 6522. IL y a #4 
adresses de base au choix (à préciser à La commande). On 
peut connecter simultanément 4 cartes EXTVIC-VIA 2. 





c — La carte EXTVIC-EPRONM 4 
qui contient 4 supports d'EPROM 2532, ce qui 
vous permet d'avoir vos programmespermanents figés en 
EPROM et disponibles dès La mise sous tension. 
Chaque EPROM peut être activée ou inhibée par interrupteur 
et être implantée au choix en 4 adresses. 





En préparation, cartes relais, programmateur d'EPROM,etc.., 


BON DE COMMANDE 


à adresser avec Le règlement à SEDERMI,28,rue Vicq d'Azir,75010 PARIS 
(délai à prévoir : un mois environ) 

NOM MR sr alerte ter RS D SE CO TE 

Adresse en en Dre Sosuis ss Dee s sans cs de sis 0 0 à Été e 


.---. -EXIVIC=BUS4=S CZS80F TTC): 2 règlement par 
ss... EXTVIC-BUS4-N (340F TTC) : E CCPE 0) 
RSR re EXTVIC-BUS4-E (340F TTC) : : CBC O 
RER EXTVIC-VIA2 C690F TTC) : : mandat : () 


adresses de base (entourer) 
9810 9820 9C10 9C20 
=... EXIVIC-EPROM4 (C290FTTC) : 


A ere AO 2 FF TTC 


GPS 








De nombreux lecteurs nous ont 
écrit pour nous manifester Leur dé- 
ception lorsqu'ils connectent à La 
fois une cartouche 8K (VIC 1110) et 
une 16 K CVIC 1111) sur un fond de 
panier (par exemple un EXT VIC BUS 
4). 


Tout se passe comme s'il n'y 
avait que La 16 K : on obtient 
19000 octets Libres. Le fond de 
panier n'est aucunement responsa- 
ble. C'est que La 16 K est aux 
adresses $2000 à $4FFF alors que La 
8 K est de $2000 à $3FFF : elle ne 
rajoute rien. 


IL se trouve que La 8 K pos- 
sède un jeu d'interrupteurs permet- 
tant de changer son adresse d'im- 
plantation. Il faut amener celle-ci 
à $6000-$7FFF. Pour cela, ouvrir La 
cartouche (dévisser La vis puis ma- 
noeuvrer d'abord Les ergots des 
fentes arrière avec un tournevis ; 
enfin louvoyer latéralement jusqu'à 
ouverture) puis faire passer l'état 
des interrupteurs : 


de 





Si vous obtenez que votre dis- 
tributeur Le fasse pour vous, ce 
n'en est que mieux. Le scandale 
est que beaucoup de distributeurs 





n'étaient même pas au courant de 
L'opération (des Lecteurs nous 
l'ont écrit). 


Cela vous amène à 28000 octets 
libres et vous n'aurez jamais plus. 
Lorsque ces extensions sont présen- 
tes, BASIC ne ‘voit'' plus Les 3 K. 
IL faut noter que lorsque La 8 K a 
été mise en $6000-$7FFF, VICMON et 
PROGRAMMER'S AID sont inutilisables 
(car aux mêmes adresses). 
Maintenant, il y a en circula- 
tion des RAM de 32 K. Eh bien, 
elles ne vous permettront pas 
d'avoir plus d'octets pour BASIC. 
En effet, Les 8 derniers K vont en 
$SAOOO-SBFFF : ils sont donc inac- 
cessibles à BASIC (sauf par POKE). 
De plus, ils rendent inutilisables 
Les jeux, SUPER EXPANDER ou MASTER. 





Lorsqu'on a une extension d'au 
moins 8 K, La carte mémoire du VIC 
est bouleversée : Les adresses mé- 
moire d'écran et de RAM couleur 
sont modifiées. D'autre part Les 
POKE dans Le boîtier VIC pour obte- 
nir La haute résolution ou les ca- 
ractères programmables sont chan- 
gés. 


Ces questions ont déjà été 
traitées en partie dans La Commode. 
Nous rassemblons ici tous Les élé- 
ments pour obtenir une solution, 
nous l'espérons, définitive. 


1) Dans votre programme, tou- 
tes Les données d'affichage doivent 
être paramétrées. Nous suggérons E 
(standard 7680 ) = origine RAM 
écran, CO (38400) = origine RAM 
couleurs, G (32768) origine géné- 
rateur caractères. 


GRR NS 
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2) Faire démarrer BASIC en 


52000 (8192) par : 
POKE 8192,0 : POKE 44,32 : NEW 
(à taper en mode direct avant tout 
chargement ou frappe de votre pro- 
gramme). 

3) Dans votre programme : 


E devient 4096 ; CO devient 37888. 


4) Sachant que, sans extension 
PEEK (36869) = 240, alors qu'il 
vaut 192 avec extension : 


Cette inhibition 
PRINT CHR$(9). 


cesse par 


Pierre Etienne THALBERG 





POKE 646, code couleur fait 
imprimer tout ce qui suit dans Le 
code couleur indiqué. C'est donc 
équivalent à PRINT "CTRL couleur" à 
part que Les codes = 8 (multicou- 
Leurs) sont accessibles. 





Ceci montre que Les POKE ont 
bien des équivalents en mémoire 
étendue contrairement à ce qui a 
été dit dans Le N° 7. 


Une autre méthode consiste à 
faire revenir Le VIC aux réparti- 
tions d'adresses de La configura- 
tion non étendue, en faisant POKE 
36869,240 ou ceux de La 2ème colon- 
ne du tableau. Simplement, il faut 
faire POKE 648,30 pour prévenir Le 
système qu'on est revenu aux an- 
ciens paramètres. 


Daniel-Jean DAVID 





PRINT 


CHRS(8) a pour 
d'empêcher que La combinaison des 
touches SHIFT et COMMODORE fasse 
passer du mode graphique au mode 
texte. 


effet 


Bien sûr PRINT CHR$S(14) et 
PRINT CHRS$(142) agissent toujours 
ainsi que POKE 36869,242/240 (Cou 
194/192). 


La combinaison POKE 36878,0 : 
POKE 36879,24 : POKE 646,8 vous 
donne des caractères gras noirs sur 
fond blanc. 


Pour Les avoir en couleur de 
code C, faire : 


POKE 36878,16*xC : POKE 36879,24+C : 
POKE 646,C. 


Pierre-Etienne THALBERG 





PROCEP vient de publier un in- 


téressant catalogue de tous Les 


“produits VIC. Celui-ci est émaillé 


de quelques programmes. Celui de La 
page 7 (au demeurant fortement ins- 
piré de ‘La Découverte du VIC" sans 
que crédit en soit donné) a une 
erreur. La Ligne 510 doit se Lire : 
…POKE CH,PEEK(CH)OR(2t(7-(XAND7)))... 


Pierre-Etienne THALBERG 


AN TRSE ABON : 


ei 





Une solution simple et pratique à un problème très 
fréquent, pour tous les systèmes du CBM 8096 au VIC 20. 


Le jeu de Super Yam's présenté 
dans Le n° 6 de La Commode utili- 
se à plusieurs reprises La fonction 
GET. (Lignes 321 à 323, 330 à 335, 
s51NaRséstetc.ce) 


Le sous-programme ci-après 
permet d'éviter après chaque utili- 
sation de GET, L'écriture de nom- 
breuses lignes de programme desti- 
nées à tester Le caractère saisi, 
et à effectuer Les branchements né- 
cessaires. 


J'emploie personnellement cet- 
te routine dans tous mes programmes 
même si ce n'est que pour "'pressez 
touche X pour action Y''. Je La pla- 
ce personnellement en tête du pro- 
gramme, après Les remarques de pré- 
sentation. 

Dans Le cas du jeu ‘Super 
Yam's" elle pourrait être placée à 
partir de La ligne 70: 


70 GOTO 140 

80 REM ROUTINE SAISIE CARACTERE 
82  POKE 158,0: LZ=LEN(ZS) 

84 GET Y$: IF Y$="" THEN 84 

86 FOR YY=1 TO LZ 

88 IF MIDS(ZS,YY,1)=Y$ THEN Y=YY 
: YY=LZ: NEXT: RETURN 

90 NEXT: POKE 158,0: GOTO 84 


Les Lignes 321 à 334 deviennent: 


321 2$="012345": GOSUB 80 

322 ON Y GOTO 
350,330,330,330,330,340 

330 L=Y-1: PRINT ‘! QUELS DES ?" 

(TS =N le SRE MEORGE=] TO_.L 

331 GOSUB 80 

334 FCE)=Y 


Les Lignes 351 à 363 deviennent: 


351 Z$='"'LMD'': GOSUB 80 
352 ON Y GOTO 400,364,369 


Les Lignes 619 et 620 deviennent: 


619 Z$='"'ON'"': GOSUB 80: 
ON Y GOTO 255,630 


Les lignes 2902 à 2910 deviennent: 


2902 Z$=''ON"': GOSUB 80: 
ON Y GOTO 3000,2910 
2910 RETURN 


Les transformations sont enco- 
re plus convaincantes Lorsque Le 
caractère saisi est alphanumérique, 
ou quand Le nombre de caractères à 
tester est très grand, par exemple 
saisie par GET du choix d'un menu 
composé de nombreuses 
L'alphabet. 


La Ligne 82 vide Le tampon du cla- 
vier (POKE 198,0 pour le VIC) et 
donne à La variable LZ La valeur de 
La longueur de Z$. Z$ est une chaî- 
ne composée de tous Les caractères 
autorisés. 


La Ligne 84 attend La saisie d'un 
caractère dans Y$. 


Les Lignes 86 à 90 testent si Le 
caractère saisi est un des carac- 
tères contenus dans La chaîne Z$. 


ARTE NT 


Lettres de 
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Si Le caractère est reconnu, La va- 
riable Y prend La valeur du rang de 
Y$ dans Z$, la boucle est close et 
on sort du sous-programme. YŸ pourra 
alors servir dans un branchement du 
type ON Y GOTO ou ON Y GOSUB. 


Si Le caractère n'est pas reconnu, 
on recommence, après avoir vidé Le 
tampon clavier. 


On peut insérer dans La Ligne 90, 
entre POKE 158,0 et GOTO 80, le 
renvoi à un sous-programme d'erreur 
ou de déclenchement d'un BEEP. 


Pour Les programmeurs qui auraient 
des problèmes de mémoire, cette 
routine peut s'écrire en une Ligne: 


70  GOTO 140 

80 POKE 158,0: GET Y$: FOR Y=1 TO 
LENCYS): IF Y$S<>MIDS(Y$,Y,1) THEN 
NEXT Y: GOTO 80 

82 RETURN 


L'inconvénient de cette dernière 
solution est que l'on sort de La 
boucle sans libérer La pile, et 
qu'on ne peut Le faire qu'un nombre 
Limité de fois avant d'arriver au 
message d'erreur ‘'OUT OF MEMORY". 





régulière de cette 


L'utilisation 
routine La rend très vite indispen- 


sable. Elle permet de faire des 
saisies de caractères très élabo- 
rées, mais reste néanmoins compré- 
hensible par tous, tout en permet- 
tant une maintenance aisée et ra- 
pide. 


Attention cependant de ne pas uti- 


liser dans votre programme une des 
variables de La routine. 


Martial MARTINEZ 


Complétez votre Collection 
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Les numéros anciens de La 


À À Commode sont 
être pas pour longtemps. Hâtez vous de compléter votre collection 


encore disponibles mais peut- 


Si vous 


ne voulez pas rater des renseignements essentiels. 


BON DE COMMANDE 


à envoyer à La Commode 28, rue Vicq-d'Azir 75010 PARIS 


Je désire les numéros suivants de La Commode (entourer) 


1 2 


Joignez votre réglement (35F par numéro) à l'ordre de SEDERMI 
D MANDAT LdT 
NOM RS RP PS PR en 7 MR QU 


B:CCP D CB 


ADRESSE 


6 


7 
109 
19 

ev® 


seems see 





Quoi ? Encore une rubrique d'astuces, à côté de VIC à BRAC 
et de PETits trucs et CoMBines ? 


Oui. IL s'agit ici des astuces applicables à La foi 
VIC et au PET/CBM. Formidable, non ? É sen 


Le système doit se rendre Lorsqu'il 
d est interrompu est fournie de façon 
Aucun Listing d'un programme indirecte en RAM (aux adresses 





qui se respecte ne tient en entier $314, $315 pour un VIC - on donnera 
sur L'écran, à fortiori sur Le VIC plus Loin Les équivalents PET/CBM). 
avec ses micro-lignes. Quant à La Il y a à ces adresses BF et EA ce 
touche RVS ou flèche à gauche ou qui forme l'adresse $SEABF qui est 
CTRL, elle ne ralentit pas assez l'adresse normale d'interruption du 
pour qu'on puisse examiner ce qu'on VIC. Or, on peut changer Le contenu 
veut. À du vecteur d'interruption puisqu'il 
Notons que sur certains modè- est en RAM pour y mettre l'adresse 
Les, avec certains logiciels, on a d'une routine utilisateur. Et 
une fonction d'arrêt des écritu- alors, il est garanti que 60 fois 
res sur écran et reprise (Ex. sor- par seconde, Le système ira exécu- 
tie d'un catalogue avec DOS SUPPORT ter cette routine. 
et bien d'autres). Si nous prenons comme routine uti- 
Ah, si nous pouvions faire lisateur, La suivante : 
que, en appuyant sur SHIFT, tout examiner Le clavier 
s'arrête et reprenne Lorsqu'on touche SHIFT enfoncée ? 
relâche SHIFT ! Nous choisissons si oui boucler sur examen du 
La touche SHIFT pour cette fonction clavier 
parce qu'avec La touche SHIFT LOCK si non, aller à La routine 
chère au Club Magenta, on peut normale d'interruption. 
avoir Les deux mains libres pendant nous avons La solution de notre 
l'arrêt : on peut même aller problème : Lorsque La touche SHIFT 
chercher un bout de papier ou un est enfoncée, Le système s'arrête 
livre pendant l'arrêt. dans notre routine d'interruption, 
Eh bien, c'est parfaitement donc L'écran reste figé pour être 
possible grâce à l'interruption examiné à Loisir jusqu'à ce qu'on 
périodique du système. Vous savez lâche La touche. 
sans doute que tous Les 1/60 ème de Voici La routine écrite en 
seconde, : Le processeur est inter- langage machine et implantée dans 
rompu de son travail normal (par Le tampon cassette. Elle est en 
: exemple exécuter une instruction deux parties. Une première partie 
BASIC) pour exécuter une routine établit Le vecteur d'interruption 
dite d'interruption. En particu- pour qu'il pointe vers La routine 
lier, au cours de cette routine, Le utilisateur. La 2ème partie est La 
système met à jour l'horloge temps routine utilisateur proprement 
| réel et examine Le clavier. En- dite. 
suite, Le processeur revient au Le lancement se fait par SYS 828. 
programme interrompu. Nous donnons ci-dessous La 
IL se trouve que l'adresse où version PET/CBM grâce aux corres- 
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VAR er: 
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pondances : 


VEC INTNOR 
CBM $0090 $E62E 
PET $0219 $E685 
BASIC4 $0090 $E455 
Mais Le test de La touche 
SHIFT doit être différent car Le 
balayage du clavier n'est pas en 


sous-programme (le système du VIC 
est mieux écrit). Aussi, sur CBM 
4000 ou 8000, La routine devra 
être placée ailleurs Siltion 
utilise Les disques en BASIC 4. 

Dans tous Les cas, avant 
d'utiliser Les cassettes ou Ll'IEEE, 
il faut rétablir Le vecteur d'in- 
terruption. Sur VIC, cela se fait 
par STOP/RESTORE. Sur PET/CBM, il 
faut un sous-programme analogue à 
La première partie qui rétablisse 
Les adresses. 

IL faut noter que sur VIC, La 
touche SHIFT est difficile à utili- 
ser lorsque cette routine est acti- 
vée. Sur CBM, elle est impossible, 
et Les touches 0, ), <, etc. (tou- 
ches de La même ligne de balayage 
sont très difficiles. Ce programme 
est fait pour figer Les sorties, 
pas pour faciliter Les entrées. 


Pierre Etienne THALBERG 


; VERSION VIC 


. 
LA 


828 033C 78 SEI 
033D A9 49 LDA ##$49 
033F 8D 14 03 STA VEC 
0342 A9 03 LDA #$03 
0344 8D 15 03 STA VEC+1 
0347 58 CET 
0348 60 RTS 
0349 20 9F FF P JSR CLA 
034C 4E 8D 02 LSR SHIFT 
034F BO F8 BCS P 
0351 4C BF EA JMP INTNOR 

; VERSION 

828 0330 78 SEI 
033D A9 47 LDA #$47 
033F 85 90 STA VEC 
0341 A9 03 LDA #£$03 
0343 85 91 STA VEC+1 
0345 58 (EI Le: 0 
0346 60 RTS 
0347 A9 08 ps LDA #£$508 
0349 8D 10 E8 STA $E810 
034C EE 11 E8 INC $E811 
034F DO F6 BNE PS 
0351 4C 2E E6 JMP INTNOR 


Pour écrire sur deux 
péripheriques à la fois 


Ex. : un fichier disque et une im- 
primante (pourrait être deux im- 
primantes). 

OPEN 8,8,8,''0:LLL,S,W'"" : OPEN&,4 
CMD8& : CMD4 : LIST 

pour terminer 
CMD8 : PRINT#4: CLOSES8 : CLOSE4 

Bien sûr, au lieu de LIST, 
vous pouvez employer PRINT (pas 
PRINT#). Cela va plus vite que 
d'employer deux PRINT# : 
PRINT#8, . PRINT#4,... mais, 
bien sûr, on va à La vitesse du 
périphérique Le plus lent. 

Cela ne marche que pour deux 
périphériques IEEE, donc pas pour 
L'écran + 1 imprimante. 

Sur VIC, cette opération mar- 
che, mais à condition d'inverser 
l'ordre : mettre 

CMD4 : CMD8 : LIST 
et CMD4 : PRINT#8 : ... 


Daniel Jean DAVID 


premiêre partie-masque interruption 
partie basse de l'adresse 


partie haute 

rétablit interruption 

deuxiême partie-examine clavier 
indicateur de SHIFT dans retenue 


boucle si SHIFT 
sinon va à inter. normale 


PET-CBM (assemblée pour 3000) 


premiêre partie-masque interruption 
$45 sur PET 

pas en page O0 sur PET 

partie haute : 


rétablit interruption 
deuxiême partie-ligne de balayage de 


SHIFT dans PIA clavier 
si pas de SHIFT : $E811 =$FF 


donc résultat nul 


sinon va à inter. normale 





Tant le VIC que le 64 disposent de modes d'affichage 
dits “multicouleurs" qui ont été jusqu'ici bien peu explo- 
rés. Une des utilisations les plus intéressantes de ces 
modes est celle qui permet de définir, sur 64, des 0.G.D. 


("'sprites") multicouleurs. 


(N.B. Cet article est en partie extrait de "La Découverte 
du 64" ed. du P.S.I., parution au SICOB 83. 





Que L'on soit dans Le cas du 
VIC ou du 64. L'affichage à La ré- 
solution La plus haute CVIC: 184x- 
176: 64: 200x320) se fait avec un 
choix restreint de couleurs. L'état 
d un point élémentaire est défini 


par un bit (CO='"éteint'". 1='"'allu- 
mé"). Ici. ‘éteint signifie ‘de La 
couleur du fond de L'écran“. ‘'allu- 


mé" signifie ‘'de La couleur spéci- 
fiée dans La mémoire des couleurs‘ 

Mais. et c'est Là que se mani- 
feste La contrainte. La mémoire de 
couleur n'est définie qu'à l'échel- 
Le de La maille caractère (CVIC: 
23x22; 64: 25x40). Donc. si deux 
points allumés peuvent être de cou- 
Leurs différentes s'ils sont dans 
des mailles différentes. ils sont 
obligatoirement de La même couleur 
s'ils sont dans La même maille. 
Ceci revient à diviser par 8 (dans 
chaque direction) La résolution de 
La couleur par rapport à la réso- 
lution géométrique. 


Ceci est suffisant dans les 
applications de tracé de courbes 
Con trace La courbe d'une couleur. 
et Le fond est d une deuxième cou- 
leur) mais certaines applications 
peuvent ne pas sen contenter. 
C est pourquoi Le VIC et Le 64 pro- 
posent des modes multicouleurs. 

Leurs principes fondamentaux 
sont toujours Les mêmes: 


1- on sacrifie un facteur 2 en ré- 
solution horizontale. Maintenant 
Les deux points N%S 2p et 2p+1 


auront Le même destin défini par 
La paire de bits correspondants. 


2 Cette paire de bits forme un 
code de couleur indirect : 2 bits 
ne donneraiïent qu'un choix de # 
couleurs possibles. Avec L'indirec- 
tion Les deux bits spécifient 
l'endroit où est à prendre Le code 
couleur complet. 


Avant d appliquer ceci aux 0GD 
(Objets Graphiques Déplaçables) ou 
“sprites" nous devons voir Les 
principes de La définition des 06GD. 





On a noelte cns un tas défi- 
ni dans une matrice 21 sur 24 dé- 
plaçable à volonté sur L écran. 


Le 64 peut gérer 8 OGD simul- 
tanément et ce, indépendamment de 
tout Le reste de L affichage. Les 
0GD sont numérotés de O0 à 7. IL 
faut noter que si un OGD apparaît 
sur L'écran au même endroit qu un 
autre affichage (p.ex. un carac- 
tère) il a priorité. c est-à-dire 
qu'il occulte cet autre objet. De 
même, si deux O0GD se rencontrent 
sur l'écran. celui de n° Le plus 
petit a priorité. donc il occulte 
l'autre. D'autre part. une rencon- 
tre sur l'écran entre un 0GD et un 
autre affichage ou un autre O0GD 


- s'appelle une collision : elle est 


détectée par Le système et c'est 
très utile pour La programmation 
des jeux. 

Les 0GD sont définis par des 


LA TARN 
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emplacements mémoire. par des re- 
gistres du boîtier 6567 propres à 


chaque O0GD ou par des registres 
partagés entre Les OGD. Lorsqu un 
registre est partagé. Le bit n 


concerne L'0GD n° i. 
Un 0GD est défini par : 


1 - sa forme. Celle-ci se définit 
de La même manière qu'un caractère 
programmable mais dans une matrice 
21 Lignes. 24 colonnes arrangées 
ainsi 


col 12.:789107215167718. 2324 
bits 16-1E107767251 11007 6.287 0 


EigrT'octet"0 octet 1 Toctet”2 
Lig. 2 octet 3 octet 4 octet 5 
Lig. 3 octet 6 


uses mme sw 


Lig.21 octet 60 octet 61 octet 62 


IL faut donc 63 octets pour 
définir chaque 0GD. En fait. on ac- 
corde un 64ie octet de remplissage 
car 64 est une puissance de 2. Cela 
simplifie lL'adressage. ( dans La 
suite. on numérotera Les Lignes de 
0 à 20 et Les colonnes de O0 à 23). 

Les adresses sont définies de 
manière indirecte à L aide de poin- 
teurs en 2040 à 2047 (derrière La 
mémoire d écran). 

Le pointeur d adresse 2040 + I 
concerne L'06D n° I (I de 0 à 7). 


L adresse de L octet 0 de L'0GD 
n° I est 64 x PEEK (2040 + I). 
L adresse de L'octet K de 


L'0GD n° I est 64xPEEK (2040 + I). 


FUOKXL ES On y met Le motif binaire 
qui définit La zone correspondante 
de L' O0GD. 

Notez que cette définition 
indirecte de l'adresse permet de 
définir plusieurs 0GD de même for- 
me: il suffit que plusieurs poin- 
teurs soient égaux; ils pointeront 
vers La même adresse mémoire et 
donc définiront La même forme. Cela 
permet aussi de tenir en réserve 
plusieurs formes pour Le même 0GD : 
on passe très rapidement d'une for- 
me à L'autre par un seul POKE dans 
Le pointeur. 


2 —- Son activation : 

L 06D n° I apparaît si Le 
bit I de L'octet 53269 est à 1. IL 
disparaît si ce bit est à O. 


Ex. faire apparaître L'OGD n°-#T 
POKE 53269. PEEK (53269) OR 21I 


3 - Son mode multicouleurs : 

L'06D n° I (activé par Le 
POKE en 53269) est mis en mode 
multicouleurs si L'on met à 1 Le 
bit n° I de lL'octet d'adresse 
SS2TOIRS 
POKE 53276. PEEK (53276) OR 21. 


& — Sa couleur : 
MuPoUrMAéT II La 

L:06D n° I. on fait : 

POKE 53287 + I. code couleur. 


couleur de 


5 —- Sa dilatation : 
On dilate en 
L'0GDn° I par : 
POKE 53277. PEEK (53277) OR 21 
On Le dilate en verticale par 
POKE 53271. PEEK (53271)0R 21 


horizontale 


6 - Sa position sur L'écran : 

C'est La position du coin su- 
périeur gauche qu'on définit. par X 
compris entre O0 et 347 et y compris 
entre 0 et 255. 

A noter que L'0GD n'est visi- 
ble sur l'écran que pour X compris 
entre 24 et 321 et Y compris entre 
50 et 229. En dehors L'0GD dispa- 
raît dans Les bords. ou même hors 
de l'écran. voir fig. suivante. 







K:347,Ys30} 
(invisible) 


WII IX-24,Y:50 nt 


Zone visible 


ne de 21x24 X2321,Y:229 
4} 





UIPXs 0,Y:0 (invisible) 








Z 





Zone de définitio 









WTIX:0,v-250 (invisible) 


Maintenant, pour spécifier Ÿ 
c'est facile. On fait POKE 53249 + 
2 * I, Y (CI = numéro de L' 0GD) 

Pour X, c'est plus difficile 
car X ne tient pas en un octet. Si 
x 255 il y a un 9ème bit à 1. 
Pour lL'octet bas de X, il y a un 
registre pour chaque 0GD: 

POKE 53248 + 2 x I, X AND 255 

Les 9èmes bits des X des 8 0GD 
sont, eux, regroupés dans Le regis- 
tre 53264 : 


POKE 53264. (CPEEK (53264) AND 
CRS5SE219N): OR: (=21)1%2(X 255) 


Le Cons n°8. 


Cette expression a L'air com- 
pliqué, mais elle ne fait qu'ex- 
ploiter Le fait qu'une expression 
logique est évaluée comme 0 si elle 
est fausse et -1 si elle est vraie. 

Revenons sur l'étape 1. IL 
nous faut choisir Les adresses 
mémoire où Les 0GD seront définis, 
donc quelles valeurs mettre en 2040 
à 2047. 

IL y a 2 choix conseillés : 

a) si vous n'avez que 3 O0GD au 
plus, vous pouvez faire : 

POKE 2040, 13 (adresses de L'O0GD 
0: 832-895) 
POKE 2041, 
1: 896-959) 
POKE 2042, 
2: 960-1023) 
«... ce qui revient à placer Les 
0GD dans Le tampon cassette, donc 
est valable pendant que vous n'uti- 
lisez pas La cassette. 


14 (adresses de lL'OGD 


15 (adresses de L'OGD 


b) on peut mettre Les données en 
12288 et suivantes ce qui se fait 
par : 

POKE 2040 + I, 192 + I 

Ne pas oublier de protéger de BASIC 
la zone 12288 par : 

POKE 52, 48 : POKE 56, 48 : CLR 


Le programme listé à La fin de 
l'article est un ‘éditeur d'OGD'". 
Il vous permet de définir visuel- 
lement vos 0GD dans une grille de 
points sur l'écran : Les . seront 
des vides tandis que Les X repré- 
senteront Les éléments allumés de 
L'O6D. Pour allumer un X à son 
emplacement, vous y allez par mou- 
vements de curseur sur La Ligne. 
Vous terminez La Ligne par RETURN. 

Le programme se termine par La 
visualisation de L'OGD qu'on vient 
de créer pendant 5 s, puis il re- 
prend La création d'un nouvel O0GD 
(vous arrêtez en disant que le n 
de L'OGD à créer est =8; vous 
pouvez recommencer La création du 
même OGD si vous n'êtes pas satis- 
fait en redonnant Le même n°) 

Le programme est aux N°% de 
Ligne 60010 et suivantes pour pou- 
voir être incorporé à La fin de 
votre propre programme d'utilisa- 
tion : vous faites d'abord 
RUN 60000 pour créer vos 0GD, puis 
RUN pour les utiliser . 

Le programme vous permet, en 

fait, d'éditer vos O0GD, c'est-à- 
dire de Les modifier à partir d'un 


dessin préalable gardé sur disque 
ou sur cassette. Pour cela, vous 
répondez "OUI" à La question “déjà 
défini?". On vous demande ensuite 
Le nom du fichier et Le n° du 
périphérique. Vous répondez Le nom 
choisi et 1 pour la cassette, 8 
pour Le disque. Si, comme nom, vous 
répondez ‘"$", Le motif précédent 
est cherché en mémoire : c'est que 
vous souhaitez modifier L'OGD que 
vous venez juste de définir. En fin 
de visualisation, on vous demande 
si vous voulez sauver votre dessin. 

En 60240, on vous demande de 


quelle couleur vous voulez votre 
0GD et on assure qu'il soit mono- 
chrome. Les instructions 60280 à 


60320 traitent Le cas multicouleurs 
que nous examinons maintenant. 


Dans ce que nous avons vu jus- 


qu'à maintenant, chacun des 8 O0GD 
possibles peut avoir sa propre cou- 
Leur, mais il ne peut en avoir 
qu'une (à part des ‘“trous'' de La 
couleur du fond de l'écran). 

En mode multicouleurs, chaque 
0GD pourra avoir trois couleurs en 
plus de celle de l'écran. 
Conformément au principe déjà ex- 
plicité, cela se paye par une réso- 
lution horizontale divisée par 2 : 
L'OGD est maintenant formée de 21 
Lignes de 12 taches élémentaires. 
Chaque tache est représentée par un 
couple de bits dans Les mémoires de 
définition. Vis à vis de l'éditeur 
d'OGD tout se passe de La même 
façon mais chaque tâche est définie 
par 2 caractères . ou X. Les motifs 
possibles sont : 


00 C..) couleur du fond 

01 C.Xx) couleur dont Le code est 
dans Le registre 52285 (couleur C1 
dans Le programme éditeur) 

10 CX.) couleur de L'OGD (registre 
53287 + I) (c'est La couleur 
unique de L'OGD en mode mono 
chrome) 

11 CXX) couleur dont Le code est 
dans Le registre 53286 (couleur C2 
dans Le programme éditeur). 


L'éditeur vous permet de défi- 
nir vos 0GD en multicouleurs et il 





vous permet une seconde visualisa- 


tion pour juger de l'effet obtenu. 


I Cned ES 
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à 
(o) 


des 


encore 
expéri 


un 
encore 
L'éditeur 


: 


sont 
et 
à 


voir dans VIC 
et 


caractères, 
BRAC une application du mode multi- 


0GD 


résolution 
IL va sans dire que La 


technique est adaptable au 64. 


2 
dans cet article, tout ce qui con- 


Les 
Nous n'avons pas abordé, 


importants 


en mode 
d'OGD devrait vous aider 


haute 


1 
domaines où Le mode multicouleurs a 


Le plus d'intérêt. Au contraire, ce 


a 


mode n'a guère d'utilité en graphi- 
même 


cerne Les 0GD (il faudrait des vo- 
lumes). Toutefois, on a vu certains 


couleurs pour obtenir des caractè- 


Conclusions 
ques 

moins 

que vous pouvez 
res gras. 
aspects 


apparaît 


‘10! 


est 
Les couleurs 


diffèrent 
entre elles que par La couleur de 


La cabine. 


. 


1s1es avec 


Limitation 
La couleur 
Les multicou- 
chaque voiture est un 
ne 
apporte de La sou- 


si 
voitures 


Les O0GD. 


leurs devront être cho 


ion 


tat 
Une 
aussitôt 
Les 
Point qui 


plesse, 


imi 


101" et ‘11! sont, elles, Les mêmes 


soin. Le programme ‘FINISH'"' (course 
d'autos) de ce numéro en est un bon 


exemple 


propre à chaque OGD, 
0GD, 


pour tous 
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chaque 0GD 


être en mode mono- 


chrome ou multicouleurs. 


au contraire, 


peut au choix 


90.7 ANALITI 


GAS 
Asa 
A2E02 
AAEGE 
ASEGS 
Q+EGS 
HE GA 
GERS 
ATEHA 
AAC GS 
AÉEUS 
GER 
G4283 
ASE 
LE LA Le) 
GrE42 
GES 
(AE) 
AaT<a2 
GAEAG 
GE TG 
HT 
24103 
Ga102 
ASTA 
AETAA 
BETA 
AETAA 
CRUE 
aATA 
5 La La be) 

6949 
GG 
Gas 
(SIME TRE) 
G+aga 
AAA 
GERS 
GTS 
AAA 


AR pee 
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Avec L'ATARI, Le programme peut 
garder Le contrôle en cas d'erreur. 
IL suffit, préalablement à l'erreur, 
donc en début de programme, d'exécu- 
ter une instruction : 


TRAP numéro. 


En cas d'erreur, vous vous re- 
trouverez en ‘'numéro'. La première 
chose à faire à cette ligne est de 
savoir quelle est l'erreur. C'est 
facile : PEEK(195) est Le n° de 
l'erreur (la Liste est dans le 
manuel ATARI ou dans "La Découverte 
de L'ATARI'") : 


EXP ID TRAP 2000 
50 READ A 
2000 IF PEEK (195)=6 THEN 
RESTORE: GOTO 50 
2010 PRINT''ERREUR NO''; 
PEEK(195) : END. 


On voit Le mécanisme: on est 
dans une série de DATA en 50. Quand 
on arrive à La fin, il se produit 
l'erreur 6. On fait RESTORE et on 
retourne Lire. Si l'erreur n'est pas 
6, on affiche Le n° et on arrête. 






| 2éthodes à 

1) D=PEEK(560)+256*xPEEK(561) 
E=PEEK(D+4) +256xPEEK(D+5) 

2) E=PEEK(88)+256*PEEK(89) 





Alors que c'est toute une his- 
toire avec Les Commodore et L'Oric, 
il est très facile de fusionner des 
programmes ou des sous-programmes 
sur lL'ATARI. 








En effet, La commande LIST peut 
s'adresser à tout autre périphérique 
que l'écran. Pour La casette faire : 


LIST''C:"" 1000,2000 


Ceci envoie Le sous-programme 
compris entre 1000 et 2000 sur La 
casette. 


Un tel fichier ne peut pas être 
relu par LOAD ni par CLOAD. Mais il 
peut l'être par ENTER : 


ENTER" C:" 


Mais ENTER ne supprime pas le 
programme déjà présent en mémoire : 
Les nouvelles Lignes lues vont s'in- 
tercaler à La place voulue par leurs 
numéros ; c'est exactement une fu- 
sion. Sur Commodore, il faut faire 
appel à EDEX, Programmer's Aid ou 
Librarian. 


Daniel-Jean DAVID 





20000 INPUT ‘'DEBUT, FIN'"';D,F 

20010 FOR L=D TO F 

20020 PRINT CHR$(125): PRINT: PRINT 

20030 PRINT L 

20040 PRINT''CONT'': POSITION 0,0: 
POKE 842,13: STOP 

20050 POKE 842,12:NEXT L 

20060 PRINT CHR$(125) : END 


Quand vous avez une série de 
Lignes à supprimer faites : 
GOTO 20000. (IL faut que Les n°° à 
supprimer soient inférieurs à 20000, 
sinon, changez Les numéros des 
lignes du programme de suppression. 


Pierre-Etienne THALBERG 
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cordon Péritel 
4) ne 
Voici Le 


Attention, Le 
du VIC (voir La Commode n 


marche pas sur Le 64. 
branchement à effectuer : 


64 télé 
connecteur vidéo . prise Péritel 


1 4 


2 masse | az 


3 son 6 





20 


5 pile 9 Vtgl---- 8 
(seulement si 
nécessaire) 


Si ce branchement ne suffit 
pas c'est qu'il faut alimenter en 
+ 12 V La broche 8 de La prise Pé- 
ritel. En pratique une pile de 9 V 
fixée à La prise péritel (- à La 
masse 4, + au 8) suffit. 


Pierre-Etienne THALBERG 





4 


POKE 53265,11 vide l'écran. En 


fait, cela désactive Le 6567, ce 
qui évite Les vols de cycles au 


processeur. Cela a plusieurs appli- 
cations : 


- extinction de L'écran pour 
dessins animés, 


- petite accélération des 
calculs, 

- possibilité d'utiliser Les 
périphériques : Le logiciel de ges- 
tion cassette Le fait automatique- 
ment, mais l'extinction de l'écran 
est par ailleurs désagréable. 


IL faudrait Le faire pour uti- 
Liser Le RS 232. 


Enfin, ce POKE vous permet 
d'utiliser L'unité de disque 1540 
du VIC sans changement de ROM. 


Vous rétablissez L'affichage 
par …POKE 253265 27Castaper...en 
aveugle) ou STOP RESTORE. 





IL semble que TAB et SPC fonc- 


tionnent correctement sur Le 64, 
alors que sur VIC, TAB et SPC don- 
naient une erreur de syntaxè s'ils 
étaient Le premier élément d'une 
Liste d'impression. 


Pierre-Etienne THALBERG 


Ce 








Le 64 est bâti autour d'un 
microprocesseur 6510 qui n'est rien 
d'autre qu'un 6502 ayant en plus un 
port d'entrées/sorties parallèles 
dont nous verrons l'usage dans cet 
article. Sinon, son espace adressa- 
ble reste de 64 K ce qui pose Les 
plus gros problèmes d'architecture 
dont nous allons parler. 


Côté mémoires, il y a d'abord 
Les 64 K octets de RAM dynamique 
(8 boîtiers de 64 K x 1 bit), deux 
boîtiers de 8 K octets chacun de 
ROM pour Le système d'exploitation 
et BASIC. On peut, à l'extérieur 
connecter d'autres ROM par Le con- 
necteur d'extension. Entainuil'e 
générateur de caractères réside 
dans une ROM de 4 K (2 K x 2 jeux 
de caractères), qui est, ou n'est 
pas incluse dans l'espace adressa- 
ble selon Les circonstances. 


Du côté des boîtiers d'en- 
trées/sorties, on trouve d'abord 
deux 6526 (2 ports parallèles 
chacun - ïils ne sont pas très 
différents des 6520 ou 6522 que 
vous connaissez probablement). 
Ensuite, Le synthétiseur sonore 
6581 et Le V.I.C. (Vidéo Interface 
Chip = boîtier d'interface vidéo). 
Tous ces boîtiers sont vus du pro- 
cesseur comme des cases mémoire. Le 
V.I.C. est Le véritable maître du 


CAFE 


système, plus que Le microproces- 
seur : c'est lui qui fournit L'hor- 
loge au système, Les signaux RAS et 
CAS de gestion de La RAM dynamique 
etc... En outre il accède à La mé- 
moiîre, mais seulement à un banc de 
16 K octets. 





La figure page suivante donne 
Le schéma de La mémoire du 64 vue 
du microprocesseur d'une part et du 
V.1.C. d'autre part, selon Le banc 
choisi. 


La plupart des besoins en mé- 
moire du V.I.C. sont en RAM, donc 
lorsque Le V.I.C. est positionné en 
banc 2 ou 3 il faut prendre beau- 
coup de précautions quant aux acti- 
vations qui sont faites. 


Clarifions ce qu'on appelle 
l'image du générateur de caractères 
en ROM. Dans les bancs O0 (qui est 
Le banc assigné par défaut) et 2, 
Lorsque Le V.I.C. effectue une lLec- 


ture dans son générateur de carac- 


tères entre 1000-1FFF, il n'accède 
pas à La mémoire correspondante 
(1000-1FFF ou 9000-9FFF) mais à La 
ROM du générateur de caractères qui 
a pour Le V.I.C. uniquement- une 
image à ces adresses. Au contraire, 
ce phénomène ne se produit pas dans 
Les bancs 1 et 3 : donc, dans ces 
bancs, Les jeux de caractères stan- 
dard seront inaccessibles. 














adr. 6510 adr. VIC 
FFFF SAFE 
b 
E000 a 
DOOG-DFFF E/S n 
C 
COO0-CFFF 3 
0 
BFFF SRE 
| b 
AO0O0 a 
9FFF n 
C 
2 
8000. 0 
TFFF 3FFF 
b 
a 
n 
C 
4 
4000 0 
3FFF 3FFF 
b 
a 
n VC 
c 1000 
; 0 Peer 
RAM ROM E/S 
Détail_d'un bloc du_V.I.C. 
Détail _du bloc des_E/S avec Les assignations par défaut 
6526 géné car 
DFFF (no 1 en DCO0, 3FFF en RAM 
no 2 en DDO0, 3000 ou OGD 
extensions en 2000 géné car 
DCOO DEOO et DF00) 1800 jeu 1 
RAM couleur 1000 LE es) et 2 
. b800 (quartets) DR TR el 
6581 Zo400-07rF AMI écran 
D400 (29 registres) DUO RE ee RE ee) 
VA IR ICE 
D000 (47 registres) 





ACTE RENE = PEUPLE 20e 
Les signaux d’activat: de A000 à BFFF : RAM ou ROM (BASIC 
AL HT ES ou cartouche) 


IL y a 4 zones litigieuses 


dans La mémoire, qui sont partagées de D000 à DFFF : RAM ou E/S ou gé- 
entre deux éléments ou plus : nérateur de carac- 
tères 


de 8000 à 9FFF : RAM où cartouche 
d'extension ROM de E000 à FFFF : RAM ou ROM (Noyau) 
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Les choix sont commandés par 
Les signaux suivants : 


B (bit O du port d'adresse 0001) 
choix RAM(O)/ROM(1) en AO0O0-BFFF 


K (bit 1 du port d'adresse 0001) 
choix RAM(O)/ROM(1) en EO00-FFFF 


G (bit 2 du port d'adresse 0001) 
active Le générateur de caractè- 
res au lieu des E/S en DOO0-DFFF 


E (fourni par une cartouche) 
active La ROM d'extension au lieu 
de La RAM en 8000- 


J (fourni par une cartouche) 
active La ROM d'extension au lieu 
de BASIC en A000- 

Ces deux derniers signaux sont 
sur Le connecteur d'extension. Ils 
sont tirés à 1 en l'absence de car- 
touche, mais une cartouche d'exten- 
sion peut Les mettre à La masse. 


La combinaison BK = 00 active 
La RAM en DOO00-DFFF. Sinon on a en 
général Les Entrées/Sorties actives 
dans cette zone (sauf si G = 0 qui 
active La ROM caractères). 


Si L'on élimine La combinai- 
son E = 1, s = O qui donne une con- 
figuration de machine de jeux, on a 
l'arborescence : 


CPE EE ETES 
01 [ak _[E/S [ekram| 8k] 40KRAM 


Noyau 










J=0 ROM cartouche 
J=1 RAM 


8k E/S| 4K| 8Kk 
Noyau RAM | ROM 


E=0 ROM cartouch 
E=1 RAM : 
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J=0 cartouche 
J=1 BASIC 


Dans toutes Les configurations 


où Les E/S sont actives, si L'on 
met G à O (par POKE 1, PEEK (1) AND 
251), le générateur de caractères 
en ROM devient accessible au micro- 
processeur. Cela ne sert que pour 
copier en partie ce générateur en 
RAM dans une application graphi- 
que. Ensuite, il faut réactiver Les 
entrées/sorties par POKE 1, PEEK(1) 
OR 4, sinon Le 64 ne peut pas faire 
grand-chose. 


Dans Les configurations à 64 K 
RAM, il faut : 


- être exclusivement en lLan- 
gage machine (BASIC n'est pas Là), 


- écrire ses propres routines 
d'entrées/sorties (Le Noyau du sys- 
tème d'exploitation est innaccessi- 
ble). , 


- activer Les E/S de temps en 
temps par LDA$1 ; ORA 1 ; STAS$1 (à 
chaque fois qu'on a besoïin de faire 
une E/S) et Les désactiver lorsque 
L'opération est faite. 


Les configurations Les plus 
utilisées sont : 


B=K=J=E=1 (configuration à La mise 
sous tension) 
avec BASIC, Le noyau et 40K de 
RAM, 


B=K=J=1 E=0 
avec BASIC, Le noyau, 32K de RAM 
et une ROM d'extension 


B=0 K=J=1 E=0 ou 1 
avec Le noyau et 52K de RAM pour 
charger un langage ou CP/M 





pris comment Le 64 organise ses 
différentes configurations, nous 
verrons dans Le prochain article de 
cette série comment Les exploiter 
en relation avec Les bancs 1,2 et 3 
de l'espace mémoire du V.I.C. pour 
que Les programmes graphiques ne 
restreignent pas trop La place mé- 
moire restant à BASIC. 


Pierre-Etienne THALBERG 


ASE ES 
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10FOR T=0 TO 8: READ A:  POKE 
74eè&+T,A: NEXT 

2OFOR T=0 TO 30: READ A: POKE 
7584+T,A: NEXT : 

30FOR T=0 TO 33: READ A: POKE 
7616+T,A: NEXT 

60SYS 7424 

TORESTORE: FOR T=0 TO 73: READ A : 
B=B+A: NEXT: PRINT B: IF B<>/7768 
GOTO 90 

80FOR T=1 TO 500: NEXT: NEW 
9OPRINT "CCLR) (DOWN) (DOWN) ERREUR 


DANS LES DATAS'"': STOP 
100DATA 160,29,162,0,132,56,134 
229,90 


110DATA 160/07485-182/29/153;119 
>creU0/192,87c08/245/189, 162 
120DATA29,133,198,76,192,29,0,83,89 
»83,22/24732,48,13;8 
130DATA166,44,164,43,142,255,3 
,140,254,3,164,45,166,46,136,136 
140DATA16,1,202,134,44,132,43,96,17 
#4, 233,8, 1Meére30)3,10,e11529,0 





1-Charger et exécuter ce programme: 
s'il n'y a pas d'erreur dans Les 
"DATAs'"" il s'efface de lui-même. 


2-Charger normalement Le premier 
programme. 


3-Pour charger Le deuxième program- 
me faire: 
SYS 7584: LOAD ‘'NOM' 


&-En cas d'utilisation de La touche 
ASTOPE pendant Le chargement 
rétablir Les pointeurs de début par 
SYS 7640. 


5-En cas d'utilisation du bouton 
""RESET'"" pour ceux qui L'on monté, 
réinitialiser Le sommet mémoire par 
SYS 7424. 


N. ce programme est destiné à un 


N.B.: 
VIC 20 + 3K de MEV. 





La ligne 10 avec La ligne 100 des 
DATAs est destinée à mettre Le som- 
met de La mémoire à 7424 pour pro- 
téger l'utilitaire. Ces 256 octets 
réservés sont vus larges afin d'ad- 
joindre d'autres utilitaires machi- 
ne dans cet espace. Cette protec- 
tion sera effective Lors de l'exé- 
cution de La Ligne 60. 


La ligne 20 avec Les lignes 110 et 
120 des DATAs prépare Le rétablis- 
sement des pointeurs début BASIC 
dans Le tampon clavier C(SYS 7640). 


La Ligne 30 avec Les lignes 130 et 
140 des DATAs effectue La sauvegar- 
de des pointeurs de début BASIC, 
puis Les modifie pour charger Le 
second programme, et enfin Les ré- 
tablit. 


La ligne 70 est destinée à contrô- 
Ler La bonne frappe des DATAs. 


IL est évident que pour un bon 


fonctionnement des. deux programmes 
Les numéros des Lignes du second 
doivent être supérieurs à ceux du 
premier. 


Pierre ROBERT 


CCR RSS 


| em 





Comme l'inflation ne s'arrêtera pas de sitôt,ce 
programme vous servira longtemps : il est prévu pour 
être mis à jour jusqu'en 1999. 


Ce programme utilise un fi- 
chier inclus dans Le programme avec 
mise à jour du fichier par création 
de lignes de programme par des 
INPUT. 


C'est Le premier programme que 
j'ai fait. J'ai commencé à l'écrire 
Le jour même ou j'ai reçu mon CBM 
il y a 3 mois. Je n'avais jamais eu 
accès à un ordinateur auparavant et 
j'ai appris Le Basic en faisant ce 
programme. Donc pas d'ordinogramme 
et même pas de projet d'ensemble 
au départ puisque je ne savais pas 
ce que l'on pouvait faire avec un 
micro-ordinateur. Ceci vous 
explique Le numérotage un peu serré 
puisqu'il m'a fallu serrer, serrer, 
renuméroter Les lignes, au fur et à 
mesure que Le programme se 
complétait (malheureusement Edex 
n'existe pas encore pour La série 
4000). 


Des amis qui ont des micro- 
ordinateurs depuis Longtemps m'ont 
dit qu'un "truc" que j'ai trouvé en 
écrivant ce programme pouvait inté- 
resser Les Lecteurs: l'utilisation 
d'un fichier dans Le programme. 


En effet, l'utilisation d'un 
fichier sur magnétophone m'a semblé 
très mal pratique : 


- nécessité d'avoir 2 magnétos pour 
Les mises à jour. 


- nécessité de recopier à chaque 
ajout tout Le fichier d'un magnéto 
à l'autre avec Les risques d'erreur 


de copie que cela comporte (pas de 
Vérify sur Les fichiers) 
- nécessité de relire tout Le fi- 


chier sur Le magnéto à chaque nou- 
velle analyse du fichier. 


Puisque Les micro-ordinateurs 
actuels ont de La mémoire centrale 
en quantité, on peut mettre Le fi- 
chier (s'il est petit ou moyen) 
dans le programme. Si Le programme 
lui-même tourne avec 8K, il reste 
8K ou 24K (CBM 4016 ou 4032) pour 
mettre Le fichier dans des DATA. En 
créant des lignes de programme-fi- 
chier par des INPUT, on peut faire 
des ajouts, des modifications, des 
suppressions et recopier Le tout 
sur Le magnéto une fois terminé ; 
et ceci en bénéficiant de La fonc- 
tion VERIFY (dans mon cas de l'in- 
dice INSEE du coût de La vie, on 
ne fait que des ajouts au fur et à 
mesure de La publication des indi- 
ces) 


Les Lignes intéressantes pour 
La mise à jour du fichier sont : 
. 8260 NL = N + 601 

ou NL = DM + 277 


C'est La détermination du nu- 
méro de ligne (NL) à générer selon 
que l'on désire ajouter des indices 
annuels (N) ou mensuels (DM). 


. 8550 INPUT 
ter) 


(Les indices à ajou- 


. 8810 et 8840 Création d'une ligne 
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de programme de DATA avec pour nu- 
méro de Ligne NL et pour contenu 
celui de La réponse à L'INPUT de la 
Ligne 8550. 


C'est donc très court (C4 Li- 
gnes de , Programme) . Dans mon pro- 
gramme c'est très Long à cause de 
toutes Les explications affichées à 
l'écran, des vérifications des don- 
nées entrées dans L'INPUT, de la 
possibilité d'entrer 1 Ligne et 
demie d'indices à La fois. 


Au Lieu de DATA on pourrait 
aussi créer des lignes de program- 
mes contenant une variable multi- 
ple. Exemple : 310 I(82) =..., 
1(83) =..., I(84) =..., mais cela 
occupe plus de place mémoire cen- 
trale et est plus Long à program- 
mer. 


En fait, dans ce programme, 
Les DATA sont retranscrits dans des 


et un temps d'accès très faible, 
inférieur à cel: des disquettes ; 
mais je n'ai pu faire ceci que 
parce que mon fichier est petit. 
J'ai d'ailleurs dans ce programme 
gaspillé La mémoire centrale au 
profit de La vitesse d'exécution 
(et de La Limitation du temps de 
lecture de La cassette). 


Le programme occupe 10600 oc- 
tets avant de tourner et 12800 
après avoir tourné. Si l'on sup- 
primait Les nombreuses explications 
apparaîssant à L'écran, il serait 
beaucoup plus court. 


Peut-être Le "truc" du fi- 
chier vous est-il déjà connu ; mais 
je ne l'ai trouvé cité dans aucun 
des bouquins et revues assez nom- 
breux que j'ai consulté. Bien 
sûr, La. création de lignes de 
programme est classique (bien que 
peu citée), mais je ne l'ai pas vue 


tableaux qui me donnent un fichier appliquée aux fichiers. 
à accès direct en mémoire centrale 


Dr. Alain TASSY 
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La méthode employée consiste à 
transformer une matrice M de départ 
autant de fois qu'il Le faut, jus- 
qu‘à l'obtention d'une matrice tri- 
angulaire: 


41 Sn1 
t 
sue ess 0 es . 
C0 = É 
e ë 0 0 0e: 
n nn nn 
Le déterminant det(M) de M est 
alors égal à: 
det(M)=e;, * es KALO ER en x k 
ou: 
-Les e..' sont Les éléments 


e î : 
diagonaux de la matrice, 


-f est un coefficient dont La 
valeur est modifiée à chaque trans- 
formation de La matrice. 


4 transformations invariantes: 

.. Ce sont Les transformations 
qui ne modifient pas La valeur de 
f. En particulier: l'addition ou La 
soustraction de 2 colonnes où de 2 
lignes. 

* transformations non invariantes: 


- échange de 2 Lignes ou de 2 


SAN AU, 


colonnes: f change de signe. 


- multiplication d'une Ligne 
ou d'une colonne par un scalaire p: 
f doit être divisé par p. 


exemple: 
1 3 3 
DE = det = det 7e 
2 4 4 
-1 3 
= det «1/2 =-1 x 4 *« 1/2 
0 4 
= -2 


Dans cet exemple 2 transformations 
élémentaires ont permis d'obtenir 
une matrice triangulaire. La pre- 
mière transformation consiste à 
multiplier La première colonne par 
2: elle n'est pas invariante. Par 
contre La seconde l'est, qui con- 
siste à soustraire La 2ème colonne 
à La îÎeère. 


Dans Le programme ci-après: 


— Le tableau MC(nc,nl) contient Les 
valeurs de la matrice, 


- M sert de variable de transfert 
Lors des échanges entre colonnes. 


L sont les variables de 
boucle permettant de désigner Les 
éléments de La matrice concernés 


par l'opération. 


ARR ES 
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s+ 


A rem * calcul determinmant d'une matrice Carrez %* 
1 print'S"s fi: de=i 
14 input'Hbre de colonnes "inc: mesno-ii nmlenci im miérii.nli 
26 +or i=g +o mes: for je to nl 
24 print'Valeurs col"i+i" lisgne"j+iz: ir méi,2 
d4f next Jj.i 
45 +or i=f to mi-i 
SG Lor jenl to it+i step-i 
Se aemeo sel, del 
SD if ef then next j.i: goto 126 
ES if E then SE 
70 +tor 1=8 +to mes memél, js mél,ji=mél.ji-15s mil,ji-ii=mi next: fz-+ 
nextis tor je to nl: memél.ji: mél. iremel+l,jis mél+l.jiems ext 
af: goto SE 
pz-bhé"a 
for l=i to nos mél,jiemil,. joke: next 
for lei to nes mél, jremel,.jr+tmil,j-19s next: fefépi ext 
for i=f to nl: desdekméi,.io: next: desde#f 
grint'Oetimis"de 
erint'ilfiutre determinant PMsesmolkelsr,.Giaetré 
it rézt" then get r£: goto 156 
if ré$és"o" then run 
Tate. 
ds 


CES | 


jri 


4 ir ON & Lil de © Gi EN 


Ft pen pet Eh ft Pb be bé job 
mn © ES © QG DE 


D =] 


i 


A VOS CLAVIERS ! 


PROCEP recherche programmeurs sachant L'ang£aïs poux 
franciser à domicile des Logiciels sur COMMODORE 64. 


Les candidats sélectionnés devront effectuer £e {ra- 
vait dans un temps Limité et être déja tnès famitiens 
avec La programmation BASIC et Assemb£eur sur COMMODORE. 
En contre-partie, 4£s pourront travailler avec Les den- 
niers matériels de COMMODORE et vivre £a Révolution 
Mécro-informatique en {emps néel. 


Adressen CV détaillé à B. CHALLET, PROCEP: 
19-21 rue Mathurin-Régnien 75015 CPARTS: 


48 
IC Chr ass 


On indique Les points de début 
des routines. Ce ne sont pas 
forcément Les points d'entrée. 


DEC 


40960 
40972 
41042 
41088 
41118 
41374 
41178 
41829 
41866 


41912 
41979 
41992 
42037 
42039 
42089 
42100 
42112 
42140 
42291 
42336 
42361 


42515 
42562 
42590 
42638 
42652 
42818 
42989 
43037 
43052 
43055 
43057 
43095 


vrs (vecteurs) ROM 

vrs action des mots-clés 

vrs fonctions 

vrs opérations 

mots clés 

messages d'erreur 

vrs messages d'erreur 

messages divers 

balaïe La pile pour 

FOR / GOSUB 

translation en mémoire 

vérifie profondeur pile 

vérifie espace mémoire 

"OUT OF MEMORY"! 

routine d'erreur 

entrée BRK 

"READY" 

préparation pour basic 

traîte nouvelle Ligne 

rétablit Le chaînage 

reçoit Ligne d'entrée 

remplace Les mots clés 
par Leur code 

trouve ligne BASIC 

effectue NEW 

effectue CLR 

copie pointeur texte 

effectue LIST 

effectue FOR 

effectue instruction 

effectue. RESTORE 

arrêt 

effectue STOP 

effectue END 

effectue CONT 


effectue RUN 

effectue GOSUB 

effectue GOTO 

effectue RETURN 

effectue DATA 

recherche prochaîne 
instruction 

effectue 

effectue 

effectue 

prend un nombre entier 

effectue LET 

effectue PRINT 

effectue CMD 

effectue PRINT 

imprime message pointé 

par (CY,A) 

impr caractère de format 

routine mauvaise entrée 

effectue GET 

effectue INPUT 

effectue INPUT 

interroge pour INPUT 

effectue READ 

mesg d'erreur en entrée 

effectue NEXT 

vérifie accord de type 

effectue expression 

constante ‘'PI" 

effectue Les parenthèses 

vérifie ")" 

vérifie ‘," 

erreur de syntaxe 

vérifie domaine 

cherche variable 

référence à FN... 

effectue OR 

effectue AND 

comparaison 

effectue DIM 
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HEXA 


BO8B 
8113 
B11D 
8194 
B1A5 
B1B2 
B1D1 
B245 
B248 
B34C 
B37D 
8391 
B39E 
B3A6 
B3B3 
B3E1 
B465 
B475 
B487 
B4&F4 


B526 
B5BD 
B606 
B63D 
B67A 


B6A3 
B6DB 


B6EC 
B700 
B72c 
B737 
B761 


B77C 
B782 
B78B 
B79B 
B7AD 
B7EB 


B7F7 
B80D 
B824 
B&2D 
B849 
B850 
B853 
B86A 
B947 
B97E 
B983 
B9EA 
BA2B 
BA59 
BA8C 
BAB7 
BAD4 


DEC 


45195 
45331 
45341 
45460 
45477 
45490 
45521 
45637 
45640 
45900 
45949 
45969 
45982 
45990 
46003 
46049 
46181 
46197 
46215 
46324 


46374 
46525 
46598 
46653 
46714 


46755 
46811 


46828 
46848 
46892 
46903 
46945 


46972 
46978 
46987 
47003 
47021 
47083 


47095 
47117 
47140 
47149 
47177 
47184 
47187 
47210 
47431 
47486 
47491 
47594 
47659 


47705 


47756 
471799 
47828 


localise variable 
vérif car. alphabétique 
crée une variable 
sp pointeur vers tableau 
valeur 32768 
convers. flottant/entier 
prépare tableau 
"BAD SUBSCRIPT'" 
“ILLEGAL QUANTITY" 
calcule taille tableau 
effectue FRE 
conv. entier-flottant 
effectue POS 
vérifie mode direct 
effectue DEF 
vérifie syntaxe de FN 
effectue STR$ 
calcule vect de chaîne 
prépare chaîne 
fait de La place pour 
une chaîne 
’garbage collection" 
teste si à conserver 
rassemble chaîne 
concaténation 
construit chaîne 
en mémoire 
rejette chaîne 
nettoie La pile des 
descripteurs 
effectue CHR$ 
effectue LEFT$ 
effectue RIGHTS 
effectue MIDS 
dépile Les paramètres 
de chaîne 
effectue LEN 
sort du mode chaîne 
effectue ASC 
obtient octet paramètre 
effectue VAL 
obtient Les paramètres 
pour POKE/WAIT 
conv. flottant-entier 
effectue PEEK 
effectue POKE 
effectue WAIT 
ajoute 0.5 
opérande de soustraction 
effectue soustraction 
effectue addition 
complémente ACC1 
"OVERFLOW!" 
multiplie par octet nul 
effectue LOG 
effectue multiplication 
multiplication d'un bit 
mémoire vers ACC2 
ajuste ACC1/ACC2 
dépassement /sous-dép. 


HEXA 


BAE2 
BB12 
BBA2 
BBC7 
BBFC 
BCOC 
BC1B 
BC2B 
BC39 
BC58 
BC5B 
BC9B 
BCCC 
BCF3 
BD7E 
BF16 
BF3A 
BF71 
BF7B 
BFB4 
BFED 
E043 
E059 
E097 
EOF9 
E12A 
E156 
E165 
E168 
E1BE 
EC 
E104 


E206 
E20E 
En 


E264 
E26B 
E2B4 
E30E 
E37B 
E394 
E3A2 


E3BF 
E447 
E453 
E45F 


E500 
E505 
ESOA 
E518 
ES44 
E566 
E56C 
ESAO 


E5B4 


DEC 


47842 
47890 
48034 
48071 
48124 
48140 
48155 
48171 
48185 
48216 
48219 
48283 
48332 
48371 
48510 
48918 
48954 
49009 
49019 
49076 
49133 
57411 
57433 
57495 
57593 
57642 
57686 
57701 
57704 
57790 
57799 
57812 


57862 
57870 
57881 


57957 
57963 
58036 
58126 
58235 
58260 
58274 


58303 
58439 
58451 
58463 


58624 
58629 
58634 
58648 
58692 
58726 
58732 
58784 


58804 


CnnS m 


multiplie par 10 

effectue division 

mémoire vers ACC1 

ACC1 vers mémoire 

ACC2 vers ACC1 

ACC1 vers ACC2 

arrondit ACC1 

obtient Le signe 

effectue SGN 

effectue ABS 

compare ACC1 et mémoire 

conv. flottant-entier 

effectue INT 

chaîne vers ACC 

prend chiffre ASCII 

constantes décimales 

constantes pour TI 

effectue SGR 

effectue ‘'puissance" 

effectue ‘opposé 

effectue EXP 

évaluation de série (1) 

évaluation de série (2) 

effectue RND 

points d'arrêt 

effectue SYS 

effectue SAVE 

effectue VERIFY 

effectue LOAD 

effectue OPEN 

effectue CLOSE 

paramètres pour 
LOAD/SAVE 

vérifie param par défaut 

teste virgule 

paramètres pour 
OPEN/CLOSE 

effectue COS 

effectue SIN 

effectue TAN 

effectue ATN 

reset tiède 

initialisation 

routine CHRGET (sera 

copiée en page 0) 

initialise BASIC 

vecteurs /copiés en $300 

initialise Les vecteurs 

message à La mise sous 
tension 

prépare adresses E/S 

établit Limites écran 

met/obtient Ligne/col 

initialise E/S 

vide écran 

curseur à l'origine 

établit pointeurs écran 

prépare val par défaut 
des E/S 

entrée depuis Le clavier 


ne 


HEXA 


E632 


- E684 


E691 
E6éBé 
E6ED 
E701 


E716 
E87C 
E891 
E8A1 


E883 


E8CB 
E8DA 
E8EA 
E965 
E9C8 
E9E0 


E9F0 
E9FF 
EA13 
EA24 
EA31 
EA87 
EB79 
EB81 
EC44 
EC4F 
EC78 


ECB9 
ECFO 
EDO9 
EDOC 
ED25 
ED40 
EDB2 
EDB9 


EDBE 
EDC7 
EDCC 


EDDD 
EDEF 
EDFE 
EETS 
EE85 
EE8E 
EE97 
EEAO 
EEA9 
EEB3 
EEBB 
EF06 
ER2E 
EF31 


DEC 


58930 
59012 
59025 
59162 
LAURE 
59137 


59158 
59516 
29991 
59553 


59571 


59595 
59610 
59726 
59749 
59851 
59872 


59888 
59903 
59923 
59940 
59953 
60039 
60281 
60289 
60484 
60495 
60536 


60601 
60656 
60681 
60684 
60709 
60736 
60850 
60857 


60862 
60871 
60876 


60893 
60911 
60926 
60947 
61061 
61070 
61079 
61088 
61097 
61107 
61115 
61190 
61230 
61233 


entrée depuis L'écran 

teste guillemet 

prépare impression écran 

avance curseur 

recule curseur 

recule dans La Ligne 
précédente 

sortie écran 

va à La ligne 

retour chariot 

vérifie diminution de 
Ligne 

vérifie augmentation de 
Ligne 

établit code couleur 

table des codes couleur 

déroulement écran 

fait place sur l'écran 

déplace ligne sur écran 

transfert synchro 
couleur 

établit début de ligne 

vide ligne écran 

imprime sur écran 

synchro couleur caract. 

interruption IRAQ 

teste clavier 

vecteurs clavier 

carte clavier 

controle graphique/texte 

met en mode graphique 

matrice des touches avec 
CTRL 

options par défaut 6567 

adr. basse ligne écran 

envoie ‘parle 

envoie ‘écoute 

envoie carac de commande 

envoi sur bus série 

time-out sur bus série 

envoie adresse secon- 

daire écouteur 

RAZ ATN 

envoie adresse secon- 

attente horloge 

daire parleur 

envoi série différé 

env. cessation émission 

envoie cessation écoute 

réception sur bus série 

met à 1 Ligne horloge 

met à O0 Ligne horloge 

sortie série à 1 

sortie série à 0 

acquiert donnéethorloge 

délai 1 ms 

envoi sur RS232 CNMI) 

envoie nouvel oct. RS232 

erreur: modem non prêt 

err.: pas prêt à émettre 


HEXA 


EF3B 
EF4A 
EF59 
EFTE 
EFCS 
EFCA 
EFCD 
EFDO 
EIRE 
F017 
FO4D 
F086 
FOA& 
FOBD 
F12B 
F13E 
FI4E 
57 
F199 
F16A 
F1DD 
F20E 
F250 
F291 
F30F 
F31F 
F32F 
F333 
F34A 
F3D5 
F409 
F49E 
F5SAF 
F5C1 
F5D2 
F50D 
F68F 
F69B 
F6BC 


F6DD 
F6E4 
F6ED 
F6FB 
F7e2D 
F76A 
F7D0 
F7D7 


F7EA 


F80D 
F817 
F82E 
F838 
F841 
F864 
F875 
F8D0 
F8E2 


DEC 


61243 
61258 
61273 
61310 
61381 
61386 
61389 
61392 
61409 
61463 
61517 
61574 
61604 
61629 
61739 
61758 
61774 
61783 
61849 
61898 
61917 
61966 
62032 
62097 
62223 
62239 
62255 
62259 
62282 
62421 
62473 
62622 
62895 
62913 
62930 
62941 
63119 
63131 
63164 


63197 
63204 
63213 
63227 
63277 
63338 
63440 
63447 


63466 


63501 
63511 
63534 
63544 
65533 
63588 
63605 
63696 
63714 


ART OLA 


désactive temporisateur 
compte de bits 
reçoit sur RS232 (NMI) 
prépare réception 
err parité en réception 
err surcharge réception 
err rupture en réception 
err cadrage en réception 
fichier vers RS232 
envoi vers tampon RS232 
INPUT depuis tamp RS232 
GET depuis tampon RS232 
vérif bus série au repos 
messages 
imprime si mode direct 
Lecture ... 
sur RS232 
entrée 
GET cassette/série/RS232 
Sortie”: 
sur cassette 

établit périph d'entrée 
établit périph de sortie 
CLOSE 
trouve fichier 
prépare fichier 
supprime ts Les fichiers 
rétablit périph standard 
ouvre fichier 
envoie adr. secondaire 
ouvre RS232 
charge programme 
!'SEARCHING" 
imprime nom de fichier 
"'LOADING/VERIFYING"" 
sauve programme 
"'SAVING" 
incrémente horloge 
note La touche lue sur 
PIA 
prend L'heure 
met à L'heure 
obéit à La touche STOP 
mess d'err sur fichiers 
trouve en-tête bande 
écrit en-tête bande 
obtient adresse tampon 
établit pointeurs 

début/fin tampon 
trouve en-tête 

spécifique 
incrém. pointeur bande 
PRESS PEAYEN TE: 
teste état cassette 
PRESS RECORD ..." 
commence lecture bande 
commence écriture bande 
code commun lect./écrit. 
vérifie arrêt bande 
établit Le timing 















INFORMATIQUE 


62, rue Gérard 75013 PARIS (1) 581-51-44 


LE SPECIALISTY BUS DE JEUX» 


6 
DES CO GICIELS SERIEUX 
ET DES EXTENSIONS 











pour le VIC 20 et le CBM 64 
© 
de nouveaux jeux (x7) 
50 TIME DESTROYER (3, 8,16 K) réf. 2022 145F 
\\C ATOM-SMASHER................... 2021 145F 
GALACTIC ABDUCTOR (16 K)....…. 9002 145 F 
MATRIX (8-16 K) ..................... 10006 135 F 
LAZERZONEE SET Ie Eire 10004 135 F 
ca LAZER ZONES: 3222: T2U 0 10054 155 F 
ceM STE EE RU RS.  rD Se 6021 155F 
MATRIX EE EN ra re ue ou 10005 155 F 
GRAND MASTER super jeu d'échecs. ..6020 290 F 
7 _e 
du serieux 
à VIC TRÉE: 2.112588 arc mao Se 6090 975F 
ceM ® GRAPHIX _ (K7)6065:195 F — disquette 6565 235 F 
ZOOM (K7) 6050:195 F — disquette 6550 235 F 
ARROW. REA ORE MENT LAS 6060 670F 
BUSICALC un vrai “calc” professionnel! 
VIG20!5:5 Tr n Parr NE 330 6001 600 F 
COMMODORE 64 aisquette ........ 6002 630 F 
CBM 4032 disquette ................. 6003 630 F 
CBM 8032 disquette ................. 6004 630 F 
Q 
des extensions 
: 6 PAL Cie PR DE A NE: PNR 3003 849 F 
NC, LIL SR AR y er PA RE 8002 549 F 
ceM 6 CARTE MERE 3 connecteurs ......... 8100 349F 


.… et bientôt des jeux francais 2 
F BON DE COMMANDE |] 
à découper et à renvoyer à : RUN INFORMATIQUE 

62, rue Gérard 75013 Paris 


M 





Adresse 








Matériel 








N° 
N 


LOGICIEL JEUX N° 
LOGICIEL GESTION N° 
BUSICALC N° 
EXTENSION N° 
Ci-joint mon règlement par chèque bancaire [] 
ou CCP [] 




















| Je passe commande de : 


( Je désire recevoir 
votre documentation 
Tous les prix comprennent la T.V.A. et les frais de port postaux 
[L_ (France Métropolitaine) 


SIGNATURE: 


publicité 





HEXA 


F92c 
FA60 
FB8E 
F897 
FBA6 
FBC8 
FBCD 
FC57 
FC93 
FC38 
FCCA 
FCD1 


FCDB 
FCE2 
FDO2 
FD10 
FD15 
FD1A 
FD30 
FD50 
FD9B 
FDA3 
FDF9 
FEO0 
FEO7 
FE1C 
FE21 
ÊE25 


FE27 
FE2D 
FE34 


FE43 
FE66 


FEB6 
FEBC 
FEC2 
FED6 
FFO7 
FF43 
FF48 
FF81 
FFC6 
FFC9 
FFCC 


FFCF 
FFD2 
FFE1 
FFE4 
FFFA 


DEC 


63788 
64096 
64398 
64407 
64422 
64456 
64461 
64599 
64659 
64696 
64714 
64721 


64731 
64738 
64770 
64784 
64789 
64794 
64816 
64848 
64923 
64931 
65017 
65024 
65031 
65052 
65057 
65061 


65063 
65069 
65076 


65091 
65126 


65206 
65212 
65218 
65238 
65287 
65347 
65352 
65409 
65478 
65481 
65484 


65487 
65490 
65505 
65508 
65530 


Lit bits CIRQ) 

range caractères 

RAZ pointeur 

prépare nouveau caract. 

commute bande 

écrit données 

écrit sur bande (IRQ) 

écrit en-tête (IRQ) 

restaure vecteurs 

établit vecteur 

arrête moteur 

teste pointeur 
Lecture/écriture 

incrémente pointeur 

entrée mise sous tension 

teste si ROM en A000 

masque ROM 8000 

rétablit noyau 

déplace noyau 

vecteurs 

init. constantes système 

vecteurs IRQ 

initialise registres E/S 

sauve nom des données 

sauve détails fichiers 

prend L'état 

marque ST 

marque time-out 

cherche/établit 

haut de mémoire 

Lit haut de mémoire 

établit haut de mémoire 

cherche/établit 

bas de mémoire 

entrée interruption NMI 

départ à chaud 
RESET/STOP 

restaure IRQ et sort 

sortie IRAQ 

table de temps RS232 

entrée RS232 CNMI) 

sortie RS232 (NMI) 

fausse IRAQ 

entrée IRQ principale 

table de vecteurs dont: 

établit canal d'entrée 

établit canal de sortie 

restaure canaux d'E/S 
standard 

entrée (INPUT) 

sortie (PRINT) 

teste touche STOP 

saisie (GET) 

vecteurs hardware. 











L'article est consacré à l'analyse d'un court programme en 
langage machine, que l'auteur à été amené à écrire pour 
rechercher, sur CBM 4032, les adresses d'un certain nombre 
de routines internes. 


En effet la documentation donne de nombreuses adresses sur 


anciennes ROMs, 


sur la version 3000 et 8000, mais est 


souvent imprécise. voire muette, sur la version 4000. 





Lorsque L'on change de version 
de CBM (passage d'un 3032 à un 4032 
par changement de ROMS. par exem- 
ple) Les routines langage machine 
ne sont plus aux mêmes adresses. 
Comment trouver Les nouvelles a- 
dresses connaissant Les anciennes ? 


Par exemple. avec un 3032 
pour effacer L'écran. on peut faire 
JSR $SE229 ou SYS 57897. Quid avec 
un 4032 ? (Non ! ce n’est pas indi- 
qué ni dans “La pratique du PET/CBM 
Vol..Il" ni dans ‘Les clefs pour 
Le PET/CBM'"'.) 


Le petit programme Langage ma- 
chine ci-après. baptisé ‘recherche 
LM". aide à résoudre ce problème. 
IL suppose connu Le début de La 
routine recherchée : il suffit de 
Lire. dans La version CBM que l'on 
connaît. Le contenu des mémoires 
par des PEEK. ou en utilisant Le 
moniteur L.M.. ou dans Le cas d'un 
3032. de consulter ‘Les programmes 
internes du PET/CBM" de B. MICHEL. 


Dans notre exemple. à partir 
de L'adresse $E229 d'un 3032. on 
trouve : A0 83 A2 18 94 EO .. 


L'idée du programme est de 
balayer Les mémoires jusqu'à trou- 
ver une suite d'octets identique à 
celle des N premiers octets recher- 
‘chés. (7 octets au maximum). 


zone mémoire 
$027A (634) à $02A0 (672) dans Le 
tampon de La 1ère cassette. (pour 
changer... et parce que celui de La 
2ème cassette contient déjà un au- 
tre programme !). 


On utilise La 


$027A contient Le nombre N 
d'octets (7 maximum) de La chaîne à 
retrouver. elle-même placée à par- 
tir de $5027B (cf. tableau 3). 


Le programme proprement dit 
débute en $0282 (642). 


Les octets 50285 et 50286 sont 
chargés initialement avec La partie 
basse et La partie haute de lL'a- 
dresse de début de recherche : Le 
programme examine si Les N octets à 
partir de cette adresse sont iden- 
tiques à ceux de La chaîne recher- 
chée : sinon. l'adresse de début 


est incrémentée et La vérification 
est reprise 
coincidence. 


jusqu'à trouver La 





Le tableau 1 décrit. octet par 
octet. Le déroulement du programme: 
La colonne ‘code contient Les co- 
des POKE pour chargement en BASIC. 


Ten l'adresse de départ de 
recherche est $B000. Les octets 


sont comparés deux à deux : on ut 


PAT AR 


29 











54 


Lise l‘'adressage indexé (Y). Le re- 
gistre (Y). mis à zéro au début. 
est incrémenté si La comparaison 
réussit. jusqu'à atteindre Le nom- 
bre d‘octets indiqué dans $027A. Si 
toutes Les comparaisons réussissent 
Le programme s'arrête en $0292 
(RTS=retour au BASIC) et L'adresse 
recherchée se trouve en 50285 et 
50286. sinon. on va jusqu à l'a- 
dresse S$FFFF et Le programme s ar- 
rête en $029D. L incrémentation de 
l'adresse s effectue en deux temps: 
poids faible. puis. si nécessaire. 
poids fort. 


Le tableau 2 présente Le même 
programme sous forme assembleur 
plus classique. 


| Charger Le programme en mémoi- 
re. soit par POKE des codes du ta- 
bleau 1. à partir de 642. soit di- 


rectement en hexa. par Le moniteur 
langage machine. 





Charger également en  $027A 
(634) Le nombre d'octets de La 
chaîne à rechercher (ici 6) puis 
Les octets eux mêmes (ici : AO B3 
A2 18 94 EO0. début de La routine 


d'effacement écran). 


Mettre en $0285 La partie bas- 
se. et en $0286 La partie haute de 
l'adresse - de début de recherche 
(ici $B000). sortir du moniteur par 
XP Net TaNreSYS 042 


Le programme s'arrête après 
une fraction de seconde. (durée ma- 
xi. dans Le plus mauvais des cas: 
2.5 sec.). 


On rappelle Le moniteur par 
SYS 4. et on Lit L adresse cherchée 
(ici $E04B) en $0286 (partie haute) 
et $0285 (partie basse). 


REMARQUE 1: Si on chargeait initia- 
Lement L adresse $0000. Le program- 
me s'arrêterait immanquablement à 
$02B7 (devinez pourquoi !) : on 
peut alors recommencer à partir de 
5027C. 


REMARQUE 2: Attention ! une même 
chaîne. si elle est courte. peut se 
retrouver en plusieurs endroits. On 
peut aussi ne rien trouver du tout. 


(et dans ce cas. on Lit 50000 en 
50285 et $0286) essentiellement si 
La chaîne extraite d'une autre ver- 
sion CBM contient des JSR ou des 
JMP à des adresses différentes ! On 


doit alors choisir un tronçon de 
chaîne voisine. sans JSR ($20) ni 
JMP (C4C). 


REMARQUE 3: Toutes ces opérations 
s effectuent facilement par Le mo- 
niteur. Mais. si L'on préfère. 11 
est aisé d'associer un programme 
BASIC conversationnel. pour charger 
Le nombre d'octets par POKE 634.N. 
puis Les octets eux-mêmes par POKE 
635.01 : POKE 636.D2... puis de Li- 
re Le résultat par: 
PEEK(646)+256*PEEK(645) 


REMARQUE #4: On peut. bien sûr fai- 
re tout en BASIC. en utilisant une 
boucle du type : 


100 FOR I=A1 TO A2 

110 IF PEEK(I)=DO AND PEEK(CI+1)=D1 
AND PEEK(I+2) AND PEEK(I+3)=D3 
THEN PRINT ‘'ADRESSE="': 1: END 

120 NEXT 

130 PRINT ‘'Chaîne inexistante" 


C'est simple. ça marche. c'est 
un peu Long (5. voire 10 minutes) 
mais surtout. c'est beaucoup moins 
instructif ! 





écran : SYS 57419 


Effacement 
($E04B) 


Défilement de L écran vers Le haut 
C‘'scrolling up‘): SYS 58217 ($E379) 


Défilement vers Le bas (''scrolling 
down''): SYS 58338 ($E3E2) (partiel- 
lement. à partir de La ligne où se 
trouve Le curseur !) 


STROUT $BB1D (comme CBM 8000)- 
(sortie chaîne pointée par Y-A) 
CRLF $BAE1 (imprime retour 
chariot) 

ADOUT $D717 (comme CBM 8000)- 


(imprime $FB-FC en 4 chiffres hexa) 


AOÛT $D722 (comme CBM 8000)- 
(imprime Le contenu de (CA) en 2 
chiffres hexa). 


CT NS 


M ee 
GES PME ECS RES FOUR EXECUTER, FAIRE SYS 442 

fres hexa entrés au clavier et sui- —_————— 

vi de "RETURN". (Meilleur que $D754 ER RE à 

qui suppose que Les deux chiffres OU UTILISER A=USR(X) AFRES AVOIR 
ont été précédés de deux espaces). FAIT: 

MOSS TE ÉTANMERÉSEN TR 


RDT : $FFCC (toutes versions) : at- 
tend que L'on frappe un caractère NOMBRE D°OCTETS srE4 
puis ‘RETURN. et envoie son code 
ASCII en (A). Si plusieurs caractè- 
res sont frappés. il prend Le pre- 
mier 


NOMBRE D'ETIQUETTES: = 


J. PIERRAT 





ENTOUENS HEMOIRES NNEMASE EURES 













OST £A2 AO GO LDYIM © 
DERUT 0292 642 Pb 140 OÔ284 444 HS A ns LDAY = 
| DE SUCRE “ G287 647 D9 7E O2 CMFY 425 
#LOOP 0284 644 LDA(V) DO Loan Do Q7 BNE. ‘859 
0285 645 #H000 (© HÉBLNSARCS | INY 
0286 646 (# 176 DÉÉD Em ACC 7A 021 CRY 6x4 
Der CAL (BAIE?) 31 7 HrG0 45 DORE BHE 444 
0228 648 #027E 127 ee, Lu 
hour - HPDENVGRNEE. ES 02 MN 40645 
0284 6sû BNE ee 0296 86? DO 64 ENE 470 
Ds oi 4 0299 664 EE Ré 02 INC 446 
PRE ES TAN 2. G29E 667 DO O1 ENE 670 
029) 653 CFY 204 029D 669 0 1 £0 . 
O2BE 454 #0274 122 LOD9E 270 20 _. 
GESF 685 2 OS ENG I PREGRE ECS 
0290 656 ENE 208 
0291 457 LOOF ere 
0792 se RTS(mRuve!)lo6 
6293 659 INC 238 
0294 460 $0285 ie 
0275 661 2 PC IRQ SR AC XR YR SP 
02984 dé ENE Z08 SES BOO DAT 0 DO CE GAL ER 
nr —— 9297 645 6 8 -M 0274 0740 
OE98 464 INC RO iE 70 DA CU er Ml SAN QU 
07299 665 $O786 134 .: 028? 40 00 29 ## DOS7E 02 
0294 666 2 -: OZ84 DO 07 C8 CC 7A 02 DÔ F2 
0298 647 ENE 208 .: 0272 60 EE 85 O2 DO 04 EE 84 
BR : 0294 0 DO O1 60.28 EO Eli 00 
9 5 


SEE Dé 
HES 178 ÉO270u: NOMERE D° OCTETS DE LA CHAINE 
DERUT BR E 


Ü?9E 
O29F 
0240 


. 
—…' 


MeTIE een il RÉ z 
k 029D 669 RTS(P4 Trouve lo 
67 
67 
47 


F3 + : 


02; AUNENDRNETENS ALRES 
CHARGEMENT TERMINE DE 642 4 472 TROUVER (MAXI 7) 


SOIMIMEN HEXA, DE 0292 À ÜZA0 SO2RS: ADL 


EO28é6: ADH 
GÉSEMAC OU ECAUIONEDNTONFEURNTE 
DEAN DUO ACO CENT ENDOREE (#1) FARTIE BASSE ET FARTIE HAUTE DE 
0292 60 EE 85 02 DO 06 EE &G L' ADRESSE MEMOIRE RECHERCHEE : 
DES MOESDONIPEOUSESAREOBEINMUE) SE MODIFIENT EN COURS D'EXECUTION. 
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Exemple 


avS4: RECHERCHE 6 OCT. à PARTIR DE #HG00 
O4E) 


XF YR ©P 
Où SE ©4 DC 


EE EE) 
Eee 
DO Hô Le 


Fra 
(LE 


mé 


Guyes QT 0 8 1 OÙ 


FC JED SR ÔC XR ÿY 

GOOS OERE 20 Où SE à 
DAPANMDAES 

O27) dé A0 AZ 

De AUMRUNME 


ÿ 








BAM BAM BAM …. 





e e 4 e e Li e 
Visualisez avec precision l’occupation de vos disques 


Introduction 


Ce programme vous permet de visua- 
Liser La BAM (Block Availability 
Map) qui représente l'image ou La 
carte de La disquette du point de 
vue occupation des Pistes/Secteurs. 


Une fois que vous aurez entré ce 
programme essayez pour une meilleu- 
re compréhension de La technique 
d'Allocation du Dos de : 


- sauver un programme ; visua- 
lisez La BAM, 


- Le ‘'scratcher''; revisualisez 
La BAM et comparez Les deux 


Cette connaissance visuelle vous 
permettra pour des raisons diverses 
de protéger une zone Piste/Secteur 
par La commande ‘'B-A". Essayez de 
l'appliquer et visualisez La BAM. 


Le programme BAM 


Le programme se décompose en deux 
parties : 


a) une partie en Basic qui ouvre 
Les fichiers nécessaires pour La 
Lecture de La BAM, 


b) [L'autre est La partie en LM. 
Elle travaille en utilisant Les 
routines du noyau. De ce fait Le 
programme doit marcher pour toutes 
Les générations de PET/CBM. Rappe- 


Lons que nous désignons par noyau 
La table d'adresses système se 
trouvant en haut de mémoire et per- 
mettant l'exécution d'une routine 
précise à une adresse commune quel 
que soit Le type de PET/CBM. 


Sinon, cette partie Lit Le secteur 
entier puis analyse Les octets de 
La BAM, l'imprime de même que Le 
nom de La disquette, La version du 
Dos et l'identificateur. 


Quelques explications sur 


le formatage des disquettes 
D'abord Le DOS (Disk Operating 
System) est en mémoire morte dans 
La 4040 ou 3040. IL est complè- 
tement indépendant de l'unité 
centrale. Il gère entièrement Les 
fichiers et La disquette (c'est-à- 
dire : catalogue Allocation et 
chainage des pistes/secteurs). 

Le programme ne se préoccupe que de 
l'allocation des Pistes/Secteurs, 
donc pour La suite de mon expli- 
cation j'ignorerai Le reste. 


1 - ALLOCATION DES PISTES/SECTEURS 
SUR LES DIFFERENTS DOS. 


SECTEURS 





SACS ES: 
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Pour information voici La table de 


La 8050 : 





Cette organisation, bien qu'à pre- 
mière vue paraissant compliquée, 
est l'une des meilleures que je 
connaisse. 


2 — BAM et titre de La disquette 
Elle se trouve sur Le secteur D 


piste 18. Quelle est sa structure? 
Voici Le tableau explicatif: 





Pour chaque octet de La BAM chacun 


des 8 bits indique si Le secteur 
est utilisé. Par exemple si Le bit 
a une valeur nulle Le secteur est 


occupé, sinon il est évidemment 
libre. 
Voici un exemple pour Les 8 pre- 


miers octets de La piste 18 secteur 
(Elune 


12 DONS O0 FMEPMEAlTR 
chaînage version 


. a) Total des secteurs libres pour 


cette piste : 21. 


b) $FF = dot Tel | SE 
Lsecteur 0 
secteur 1 
| Lsecte 2 
secteur 3 
secteur 4 
secteur 5 
secteur 6 : 
secteur 7 


c) $FF = AE 1 1 7 


1 
| L Lsecteur 8 
secteur 9 
secteur 11 
0 


| lsecte 10 
secteur 12 
secteur 13 
secteur 14 
secteur 15 
c) $1F = DÉOMTEARTEI 1 
| Secteur 16 
| secteur 17 
secteur 18 
secteur 19 
secteur 20 


Les 3 octets de gauche ne sont pas 
utilisés dans cet exemple. 


Programming the PET/CBM par Raeto 
COLLIN WEST. 


Programmes Internes du PET/CBM par 
B. MICHEL. BCM 


Clefs pour Le PET/CBM, 
éditions PSI 


D.J. DAVID, 


Compute's First Book of PET/CBM, 


Compute. 


N-B. Le ‘'Dump" de La mémoire à pu 
être effectué à l'aide de MICROMON 
qui m'a été envoyé directement par 
l'auteur : j'en profite par ces 
Lignes pour Le remercier. Sinon ce 
proogramme est du domaine public et 
ne peut être en aucun cas vendu de 
même que Le programme de BAM. 


Thierry HENTIC 
Pascal MARCHANDEAU 


LATE DT 





END GP MAE PA=S | 


am1@ >PU "@i:EAM.Ma" 

GGZA PE HMANERMANMMAENMMNRMAMEAMRMAMMMMRIRX 
GG3G ;*% PROGRAMME DE LECTURE DE LA EAN 
GG4G ;:# FONCTIONNE EN BASIC 2.6 

AAA 2% ET 4.@ 

BE :# VERIFIE AUSSI LE OS DE LA 

447 @ :# CDISQUETTE( 3648-4046 

GAS RAA MAERMMMANNMMMNNNN ARENA ANMARARAE 

































































(SISTER 
a18@ ; 
ai1a .LS 
12e .0S 
4138 .BA $asaa : 
ai4m : 
G15@ : 
G168 SETIH .DE $FFCE 
a17a LRT .DE $FFDZ 
188 CLR .DE $FFCC 
&13@ GETIH .DE $#FFCF | 
&24@ PLEIH .DE #51 
G214 VIDE .DE #57 :RONO YIDE 
| ASAG- AZ 2 azzà LOK ##@2 
HSB2- 24 C6 FF za JSF SETIH CHOIGSIT LE FICHIER #42 EN | 
| GS9S- AG Gù az4n LOY ##6a | 
GSGr- ZA CF FF G@254 LOOF JSR GETIH LECTURE QE LA TABLE 
USAA- 99 52 GS uz6ù STA BAM, + | 
| aSäD- CS azra IH | 
| &SäE- où azan BNE LOOF PAS FINI 77 | 
| aS1ia- zu &z236 JSR CLR :DESELECTION PERIPHERIQUE | 
| 4513- AC aa TEST LOR BAN+Z | 
MS16- C3 az1m CNF ##$@1 :CHERCHE LA VERSION COS | 
GS18- où ere) BNE TESTI | 
| AE1R- 24 azz@ JSR DSa4& :D0S 2 -DINIT TABLE | 
| &SiO- 4C az4n JMP FIHTEST #RETOUR 
aSz@- C9 MSG TESTI CMP ##$41 | 
| na azea BNE TESTERR :NOH ERREUR ET MESSAGE 
24 azra JSR D4&4@ :D0S 4->INIT TABLE 
za ASS FINTEST JSR AFFIMESS IMPRESSION MESSAGE 
za azsn JSR BAMINIT | 
AO = CETTE LOR TABLE IHIT HBRE QE 
s0û = F a41 STA INOICE* 2SECTIEURNEM PISTE 
AD 26 6 B4zm LOA TABLE+1 :À AFFICHER 
SO Sd A7 R4sn STA IHNOY PRE BAMPRINT 
USXS- 0 53 GT 44 STA INDICE : 
AS3C- ZA 6C A7 A4Sa JSR BAMPRINT 2" EAMPRINT” 
QS3F- AD 27 &6 G4sa LOR TABLE+2Z 
AS4Z- 80 SE A7 47m STA INDICEX 
HS4S- A0 23 46 a LA TABLE+3 
GEd4S- 80 S4 7 a STA INC 
80 52 ar ta STA IHOICEY 
28 60 ar ä JSF BAMPRIHT :10EN 
AC HS AS24 TABLE+4 
Sc a sa INDICE“ 
: Role FABLE+S 
Ep 34 85 HSéh Hip 
ac A7 ASEt INDICE 
24 a? as7a + EAMPFEINT :IDEN 
AC AS  HSan THRLE+E 
äC M7 4535 INHOICEX 
us aéam TABLE+7 
47 aim LHC 
Gr méza IHOICE"r 
à Ex F ERMPRIHT :ICEM 
DEEE 7 MM REA AURA AREA AE 
aSS& #4 ECRITURE HOM DE LA DISOUETTE 
AGE 7 AMAR MO EERE ER HAE 
asra : 
CE Gsza LORH ##13 CURSEUR EH HAUT 
CE asza JSF WRT :ET À GAUCHE DE L'ELFHAH 
a ar ag LOX ##am 
( GS G71Q FIHNOMI LOR BAM+144.% :HEME CARACTERE OÙ HON 
a a7za BEO FIHHOMZ :DE LA DISOUETTE 
a FF aan JSR WRT 
a ar4@ IH 2H=x 41 | 
a as ENE FIHHOM1 
“4 a FIHHONMZ RTS 
ct à Dxa4i LOA #$14 ; 46 
a a STA TABLE+3 220 SECTEURS SUR PISTEUX 
a 34 RTS | 
a a& D4@d4& LOA #$13 :C'EST UNE 44m 
c Ss1a STA TABLE+2 
E az2a RTS 
A&Sa TESTERFR LOY #5@m 
AS ad LOA ERREUR. 


59 | | 
PNA | 
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agse 

azé A 

azra 

Late le] 

GSSA FINTESTERR 
ASE PRINTCHAR 
A3 1 14 

A92a PRIHTCHAR1 
4334 

494 

(RTS) 

A6 

Ar 

A3 SKIF 

334 








ALL EELESESSE EEE ET ES à 
 INITIALISATION DES PFARAMETRES 


; FINTESTERF 
 URT AFFICHAGE “COISQUE HON REC 


TESTERR+E 


#$aa 
L SE) , 


LIGNE SUIVANTE 


# 





dd 


iaia 8 MMM ME MEME REA ER HENROEEE 





1auE 
ASURS 192@ BAMINIT 
SO 47 &S 1838 
S5 && 1846 
43 86 1a5@ 
230 4% Gé 1a6a 
85 a1 1aFa 
43 4S 1asa 
30 S1 6 149 
A3 ia 110& 
0 44 B6 111@ 
GSCA- SD 45 G6 1126 
GSCD- &D 46 86 1136 
as0G- 6@ 1148 


&SCO1- 933 AC aû 
&=Q04- 12 2@ 2@a 
aS07- 26 SE 49 
GSOA- 53 S4 45 
aSD0- 53 2 24 
GSEG- 2@ 31 2a 
HSE3- 24 24 z& 
QSE6S- 24 24 24 
ASES- 20 2@ 32 
ASEC- 2à 24 2& 
ASEF- 24 24 26 
GSF2- 2@ 24 24 
GSFS- 33 24 28 
ASF&- 24 24 24 
ASFE- QD 


1154 MESSAGEZ 





ASFC- 12 ZA 24 1168 
ASFF- 24 31 32 
asaz- 33 34 35 
H6AS- 36 37 38 
AsAS- 29 38 31 
GSAB- 22 33 34 
HSME- 35 36 37 
aéii- 38 39 30 
aS1i4- 31.32 33 
aé17- 24 35 36 
G61A- 37 38 39 
aSiD- 3û 31 3Zz 
As2A- 33 34 35 
&G6z3- AD aa 
GS2S- 11 15 Q7 117A TABLE 
G6SE2S- 13 A6 12 
ag 
44 1128G ERREUR 
SL 
za 
4E 
45 
GS3O- 43 4F 4E 


as4a- 4E 55 GD 
as43- aa 


Std 119G SECTEUR 
A64s- 1244 BIT 

aé4r- 121@ POINTTABL 
as49— 2z@ OCTET 

ass . 123G ORGEYTEBANM 
&S52- 1244 EAM 

Cr 1254 INOICEX 
AFS3- 126@ INDICE 


Ars eva INOY 





45 43 1280 COLONNE 
ASS 

5S 6 

Sa 5E& 

sa 64 

sa 


LOR 
STA 
STA 
LORA 
STA 
STA 
LOA 
STA 
LORA 
STA 
STA 
STA 
RTS 
«BY 


-.ET 


-RY 


-BY 


.DS 
-DS 
-.DS 
-DS 
«DS 
.0S 
-0S 
-0S 
.-DS 


- Er 


#$AS 

PQOINTTABRL 

*$Ga :POINTEUR BAS DE LA EAN 
#$3a 

POINTTABL+1.;: 

#k#Q1 :PONTEUR HAUT QE LA EAN 
#$GS :LA BAM COMNMENCE ALI SEME 
ORGEYTTEBANM sCOCTETAOENLE 

#$Qc PISTE 13 SECTEUR @ 
SECTEUR :INIT HONBRE 

SECTEUR+1 SECTEUR LISFE 

BIT 


147 $@0 +@D $12 ” FISTES 


les 


147 18 ’OISQUE NON RECONNU" 13 € 


:COMFTEUR SECTEUR LIBRE 


TRANSFORMATION DE L'OCTET 
INDICE DE L'OCTET CE LA 
56 CARTE CE LA BAM 


REG TEMP PISTE 
"SECTEURS" F6 +560 $F6n +64 +6 FEU FA F6 


nm me Py (0 D + M 


CPR LRR 


a7ss- 6ù 6ù 68 129a .BY $6a $6u $6û $6u 
a769- 6@ : 
a76A- 1208 SECTEUR. CO .DS 2 


1210 sHMMMMMNMMNEMMENEMEMENNOREMONNEMENNENENE 

1328 IMPRESSION DE LA CARTE 

1330 MEHR AMMEMORNNEMEMENENENENE MEME EEE ME MD MO 
G76C- AE S1 6 1340 BAMPRIHT LOX ORGBYTEBANM 


&a76F- BD 52 06 1359 LOR BRM.Xx 

Gr72- A2 @7 1369 LOX #$a7 

774 GA 137G BAMPRI1 ASL À TEST LE BIT + À GAUCHE 
arrs- 9@ GA 138 BCC ZERO SECTEUR LIBRE? 
grrr 48 139 PHA # QUI 

arre- A9 27 14a@ LOR #YIDE ?SECTEUR LIRRE 
a7rA- 90 49 Gé 1418 STA OCTET.Xx 

arr0- 68 142@ PLA 

d77E- 4C 96 @7 1438 JNP DECREMENT 

ar781- 48 144G ZERO FHA 

a782- A9 Si 145a LORA #PLEIN :SECTEUR OCCUPFE 
&7S4- 90 49 6 146& STA OCTET.* 

a7a7- EE 44 @S 147@ INC SECTEUR 

Gr8A- DG @3 1488 BNE DECREMENT-1 

a7aC- EE 45 @6 149a INC SECTEUR+1 

Gr7SF- 68 158@ PLA 

&av36- CA 151@ DECREMENT DEX 

GPS IGNEt 1520 BPL BAMPRI1 

a793- AE 46 @6 15398 AFFOCTET LO* BIT 

a736- RO 49 GS 1544 LOR OCTET,* 

a739- 20 A2 AS 1554 JSR PRINTCHAR 

a79C- EE 46 M6 1568 INC BIT 

G73F- AD 46 @6 157a LOR BIT 

arAz- C3 68 158@ CMP #$068 

&arA4- DA 88 1598 BNE RAFFOCTETI1 

arA6- A3 aa 16a8 LOR #$90a 

ArAS- 80 46 GS 1616 STA BIT 

GFPAB- EE Si M6 1628 INC ORGBYTEBANM 

G7RE- CE 53 @7 1623@ AFFOCTET1 DEC INDICEY 

avBi- F& @2 164Q BEQ CHANGEPIST 

arB3- 06 B7 155@ BNE BAMPRINT 

a7BS- ADO 54 &7 166@ CHANGEPFIST LORA IHDY :CHGT DE PISTE 
&a7Bg- 80  SS G7 167a STA INDICE'Y 

a7ER- A9 aa 168G LORA #$a@ 

&FRD- 80 46 @6 1698 STA BIT 

AFCO- EE Si A6 17aa INC ORGBYTERANM 

OPCS-NEENSINOSN 11 INC ORGBYTEERANM 

a?Cé- EE 47 6 1728 INC POINTTABL 

arcg- OG 3 173 BNE SKIP1 

GFPCB- EE 48 @6 1740. INC POINTTABL+1 

QFCE- AD 47 A6 17S@ SKIPiI LDOR POINTTABL 

arD1- 85 a@ 176a STA *x$au 

aFDS- AD 48 G6 1778 LOR POINTTABL+I 

arDOs- 8S ai 1783a STA *#$ai 

G7O8= CE S2 07 17908 DEC INDICEX 

&arO0E- 0 SF 13a@ BNE BAMPRINT 


aFOD- SA 1214 RETOUR RTS 
: 1820 HARMAN RERO 
183@ :#IMPRESSION DES MESSAGES 
1240 2 HAMMAM MN 


QGYOE- AZ aa 1354 HFFIMESS LO* ##$00 2AFFICHE 

G7EG- 60 O1 GS 1868 MSG1 LOA MESSAGEZ ,Xx :MESSAGE ‘PISTE 

ay7E3- F6 @é6é 137@ BEQ MESFIN2 B 

@G7ES- 2@ O2 FF 1884 JSR URT [ 

Gr7ES- E8 129@ INX : 

GYES3- O@ FS 130a BNE MSG1 3; 

G7EB- 42 ÀF 191Q MESFIN2 LOX ##AF 2IHIT HER SECTEURS-UNITES 
Q7ED- SE 6A @7 1928 STX SECTEUR.CO 21 DINENNASCPI ETURVS 
arFa- E8 1933@ IN% : 

a7Fi- SE 6B 07 1948 STX SECTEUR.CO+1 2INIT NB SECTEURS-NI1Z. 
ärF4- À9 AG 195@ LDR #$Aa@ 2INIT FTRS PRINTCHAR1 
GrFé- 85 aa 136G STAR *$aa :À $8aAu QUI EST L'ADRESSE 
GrFe- A9 ga 197@ LOR ##$3@ :DE DERUT OE LA 

QGFFA- 85 1 138a STA ##$ai :5 IEME LIGHE 

GrFC- A2 Ga 139 LO*X ##a@ :SERT DE PTR POUR LE TEXTE 
@r7FE- AG Ga 28488 COL LOY #$00 2POINTE 1 ERE COL. 

ueog- BD 5 @7 2816 LOR COLONHE .x FA<CRRACTERE À AFFICHER 
asa3- 18 282@a CLC 

ARG4- 69 4@ 2a3a AOC #$4G PASSE À EN REYVERSE 
gegé- 91 Ga 2844 STA <$@@) ,r 2AFFICHE À 

asas- C8 2a5a IHY JOFFSET = 1 

G8a9- EE 64 07 -2@G6@ INC SECTEUR.CO 2INCREM. COMPT. UNITE 
@eac- AD 6A 7 28Fa LOR SECTEUR.CQ REGARDE SI > 3 

GasgF- C9 BA 2a8a CMP #$BA 

@GS811- DOG &GF 2a3a BHE SUITE NON SAUTE 

GRiz- EE 66 7 z1qaa INC SECTEUR.CO+1 ?OUI INCREM. D1Z. 


G216- AD 6B @F Z11@ LOR SECTEUR.CO+1 2AFFICHE DIZ. 
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Gg19- 931 a 2124 
AR1E- A9 EG 2134 
a&i0- 80 64 47 2144 
axzä- DG &4 2154 
aazz- A9 AG 2164 SUITE 
aaz4- 91 a& 21F7a 
aeze- AD 64 @7 Z18@ SUITE 
Gaz9- CS 219€ 
aS24- 931 a& zz2aa 
ag2C- ES 221@& 
@aSzD- EG 1S 2z2a 
ag2F- F4 &6 2z3a 
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Une utilisation dans le domaine médical, mais le module de 
saisie des données sur écran peut s'appliquer à d'autres domaines. 


La croissance rapide de La de- 
mande d'examens de Laboratoire fai- 
sait craindre une Lente, mais cer- 
taine, asphyxie du secrétariat. De 
plus, La présentation des documents 
rédigés à La main laissait à dési- 
rer. 


Tentés par Les techniques de 
L'informatique, nous avions envisa- 
gé d'installer un mini-ordinateur. 


Une enquête menée en France 
et en Allemagne, nous a fait renon- 
cé à ce projet. Les inconvénients 


principaux étant : 
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- Le côut très élevé du ma- 
tériel 
- La relative lourdeur des 
systèmes 

- La nécessité de La présence 
permanente d'au moins un informa- 
ticien 

- Le coût élevé de La ges- 
tion. 


L'apparition sur Le marché en 
1978 des premiers micro-ordinateurs 
et Leur très faible coût nous a 
amenés à reprendre notre projet. 


Pour éviter de perturber Le 
fonctionnement du secrétariat et 
Laisser s'habituer Le personnel, 
nous avons choisi une philosophie 
de prudence et de progressivité. 
Pour cela, nous avons sélectionné 
un problème bien défini, marginal 
par rapport au fonctionnement 
journalier. Qui de plus par son 
incidence financière  amortirait 
rapidement Le coût du matériel. 





La facturation des examens de 
Laboratoire pour certains malades 
sortants répondait à nos critères 
pour un premier essai. Il s'agis- 
sait d'éditer un document détail- 
Lant Les examens avec Leur nombre 
et Le montant total. Ce travail 
pouvant s'effectuer à des heures 
creuses. . 


Je l'ai rédigé, avec comme 
objectif La simplicité et La ra- 
pidité de La saisie. Chaque examen 
étant codé sur deux caractères (une 
Lettre, un chiffre). 

Le nombre d'examens était 
frappé dans une boucle de GET. 

Le document obtenu par sa 
clarté a permis d'améliorer très 
fortement Le recouvrement des som- 
mes dues. 

Ce premier succès nous a con- 
duit à viser un deuxième objectif 
plus ambitieux. 

LA SAISIE journalière des 
examens de Laboratoires demandés 
par Les divers services de L'hô- 
pital, Le personnel, Les hopitaux 
extérieurs. 


Pour cela, nous avons amélioré 
Le matériel. 


Le PET 8 K a été remplacé par un 
CBM 32 K. 

Le magnétophone par une unité de 
double disquette. 

L'imprimante CENTRONICS à rouleau 
par une petite CBM 80 colonnes. 


CE 


nouveau progr 





Saisie de l'identité du malade 

Saisie du service selon une 
FeSire ou 1 chiffre clef (A à 2Z, 1 

Saisie des examens ordinaires 
demandés. 

Eventuellement, saisie d'exa- 
mens peu habituels et des prélève- 
ments. 


Copie des saisies sur disquet- 
te avec numérotation automatique 
des malades successifs. 

Exploitation de La saisie pour 
éditer Le journal Légal et La fac- 
turation des examens. 


ipératifs 





- La rapidité de La saisie 

- La facilité d'emploi 

- La clarté de La visualisation 

- La sécurité de La saisie 

- La rapidité de L'exploitation et 
de l'édition. 





Un menu permet de choisir entre 
- Débuter Le programme de saisie 
journalier 
- Reprendre une saisie interrompue 
(panne d'électricité, etc.) 
- Lire Le fichier de regroupement 
par service 
- Terminer Les opérations. 


Le début de saisie demande Le jour 
(mois et année sont mis automati- 
quement ). 





Une technique spéciale d'INPUT est 
utilisée. On ouvre une file sur Le 
clavier considéré comme périphéri- 
que extérieur. Le clavier comporte 
un tampon de dix caractères qui se 
vide automatiquement dans Le tampon 
de saisie du Basic. 

Ceci permet une présentation beau- 
coup plus agréable, toutes Les 
questions étant affichées simulta- 
nément à L'écran. 

Le mécanisme est très simple, Le 
curseur étant envoyé successivement 


sur Les lignes à saisir. (lignes 
625 à 808 du programme). 


La saisie terminée, on passe à... 





Après La saisie d'identité, Le 
tableau des examens est affiché à 
L'écran. 

IL comprend 8 colonnes et 19 
Lignes. 

Les examens sont affichés sur 
quatre caractères, ce qui oblige à 
des abréviations. Celles-ci sont 
choisies pour être claires. 

Un curseur clignotant (Lignes 
1860-1900) marque l'examen à sai- 
sir. Il se déplace par Les curseurs 
habituels, un à droite saute une 
colonne, un en bas saute une ligne, 
par exemple. 

De plus Le tableau numérique 
considéré comme un miroir de 
L'écran, permet des déplacements 
rapides. 

Par exemple Le 5 envoie au 
centre, Le 9 en haut à droite etc. 

Les Lignes 1630 à 1770 as- 
surent cette gestion d'écran par 
des GET. 

La touche "ESPACE" ou La tou- 
che ‘“ x "" permettent La saisie d'un 
examen. Ce qui se manifeste à 
L'écran par une inversion vidéo. 

On peut toujours annuler une 
saisie en revenant sur l'examen et 
frappant La touche" - ‘“" arithmé- 
tique. 

La saisie a aussi pour effet 
de coder l'examen et de l'ajouter 
dans La chaîne de caractère LY$. 
Le code consiste à remplacer Le 
numéro d'examen par un code ASCII 
obtenu en évitant Les caractères 
qui seraient gênants à La saisie 
sur disquette tels que chr$(0) ou 
chr$(13). 





On lL'obtient, soit que l'on 
ait atteint Le nombre limite d'exa- 
mens choisis, soit Le plus souvent 
en frappant La touche "OFF". 

On demande alors si toute 
l'ordonnance est saisie. Sinon, on 
appelle un deuxième tableau de sai- 
sie d'examens plus rares et même 
La possibilité de saisir un examen 
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PCNRSS 

















en clair. 
On passe ensuite à La saisie 
éventuelle des prélèvements. 


Saisie des prélèvements 


Celle-ci est présentée en 
tableau selon une liste corres- 
pondant à La classification de La 
Sécurité Sociale. 


A chaque prélèvement, on de- 
mande La qualification du préle- 
veur. 

IL y a refus, si celle-ci 
n'est pas suffisante. 


Ordonnance facturable ou non 


Certains examens ne peuvent 
être facturés qu'après retour des 
résultats du Laboratoire. C'est 
pratiquement La règle en bacté- 
riologie. 

Cela est noté par code. spécial 

c pour facturable 

i pour facturation différée. 

Le dernier renseignement dé- 
clenche La copie sur disquette de 
la saisie. 


Saisie s ur dis q uette 


Pour des raisons de simpli- 

‘cité, de clarté et pour éviter bien 

des erreurs, nous avons choisi La 
création de fichiers séquentiels. 

Comme Le nombre d'ordonnances 
se situe entre 100 et 140 par jour, 
nous avons voulu profiter de La 
commodité du directory et de La 
puissance du traitement de chaî- 
nes disponible sur Le CBM. 

Pour cela, un nom de fichier 
est attribué à chaque patient. Le 
nom est construit à partir d'élé- 
ments essentiels de La saisie. IL 
s'obtient par concaténation 
- de La Lettre clef du service (de 
A à Z puis de 1 à 2) 

- du code de facturation (c ou i) 
- du numéro sur trois chiffres du 
patient. 

On concatène à gauche Le numé- 
ro de La platine et à droite La 
chaîne 
",S,W" pour l'écriture 
",S,R" pour La Lecture 

De plus, un autre fichier 
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général concatène en Les regroupant 
dans une chaîne pour chaque ser- 
vice, Les saisies successives. 


Cette méthode présente de très 
nombreux avantages : 
- en éditant Le directory on a une 
image selon une clef choisie, des 
ordonnances. 
- L'exploitation se fait avec une 
excellente rapidité, La recherche 
de chaque fichier étant très 
simple. 
- On travaille avec une sécurité 
beaucoup plus grande qu'en accès 
direct. 
- Selon Les besoins d'exploitation, 
on peut étendre Le nom de chaque 
fichier à seize caractères. Ce qui 
donne d'énormes possibilités d'ex- 
ploitation selon des critères préa- 
Lablement choisis. 


Evidemment, comme toujours, il 
y a un revers La médaille, c'est 
La place perdue sur La disquette. 

Pour nous, cela n'est pas 
gênant. En effet, La capacité 
relativement faible des disquettes 
ne nous permet pas de gérer notre 
fichier d'environ 10000 malades. 
Nous sommes donc amenés à garder 
notre technique des fiches cumula- 
tives obtenues. par photocopie. De 
ce fait, qu'importe de remplir plus 
ou moins La disquette. IL ne faut 
jamais chercher à faire entrer un 
éléphant dans une 2 CV. 

Pour notre part, nous utili- 
sons une disquette par jour de La 
semaine. Un programme “"EFFACE" re- 
met automatiquement Les disquettes 
à blanc après La fin de l'exploi- 
tation. 

Nous pensons bientôt relier 
notre CBM à une mémoire à disque 
type Winchester et bien sûr 
alors, nous changerons notre façon 
d'opérer. 


Edition du résultat 


En début d'après-midi, nous 
appelons La routine IMPRESSION 
LISTES SERVICES qui affiche à 
L'écran Les noms des services ayant 
envoyé des examens. Nous répondons 
aux questions demandant Le der et 
Le dernier service à éditer. En 
général, La totalité est demandée. 

Le programme va Lire alors Le 


CT NS 


fichier général, en extrait Les 
chaînes correspondant à chaque 

service, Les découpe en fichiers 
malades qui sont lus et édités à 


raison de quatre par page. 
Pour chaque service, on saute 
à La page suivante. 


L'impression obtenue avec La 
petite imrimante CBM 3022 est su- 
perbe et permet d'obtenir des docu- 
ments parfaits faciles à archiver. 


Le document comporte tous Les 
éléments essentiels concernant 
l'ordonnance. 


- Identité du malade 
âge, sexe, 
tion) 

- Service émetteur 

- Numéro d'ordre Légal 
- Examens demandés 

- Facturation 


(Nom, prénom, 
numéro d'hospitalisa- 





Si pour une 
(panne d'électricité, erreur, etc.) 


raison quelconque 


La saisie a été interrompue, une 
routine "Reprise saisie” permet de 


reprendre La saisie après Le der- 
nier enregistrement sans perte 
d'information. Elle reprend entre 


- autres, sans que l'on ait à inter- 
venir, La numérotation des malades. 

















Le micro-ordinateur CBM 32 K 
avec une unité de disquette 3040 et 
une petite imprimante nous a permis 
d'apporter une grande amélioration 


au fonctionnement d'un important 
Laboratoire central hospitalier. 

Financièrement, il a permis Le 
recouvrement de sommes importantes 
par L'édition claire et rapide des 
frais d'examens concernant certains 
malades sortants. 

Il a permis une saisie rapide 
des examens journaliers et une très 
belle édition du journal Légal et 
de La facturation. 

Il n'y a pas eu de problèmes 
notables d'introduction de ces 
méthodes vis-à-vis du personnel, 
mais au contraire émulation. 


Le personnel utilisé a été 
choisi parmi Les infirmières et 
infirmiers et travaille sans dif- 


ficulté en dehors de La présence de 
tout informaticien, avec un taux 
d'erreur très faible. 

Je pense que notre façon très 
progressive de développer L'infor- 
mation du secrétariat a grandement 
contribué à ces résultats très 
positifs. 

Ceci nous encourage à passer 
bientôt à des projets plus ambi- 
tieux comportant entre autres La 
gestion des résultats et du fichier 
général des malades. 


Jean DELAVILLE 
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COMMUNIQUEZ 


AVEC 
TRANSNEX 


pour CBM 4000/8000 


- Transnex asynchrone : carte d'interface RS232C/V24 
connectée sur bus extension mémoire 
+ extension Basic communications. 


- Commodial : logiciel d'accès banques de données (QUESTEL...) 
services de messagerie électronique (MISSIVE...) 
livré avec programme source. 


En option : adaptateur MINITEL permettant de relier un CBM 
équipé de TRANSNEX à un terminal MINITEL. 


En option : adaptation CBM 3000 / 4000 petit écran. 


DOMAINES D'UTILISATION: 


- Accès banques de données sur réseau téléphonique 
ou TRANSPAC (jusqu'à 1200 bauds full duplex) 

- Services de messages électroniques 

- Transfert de fichiers entre CBM 

- Transfert de fichiers de texte TRAITEXT vers 
télécomposeuse (logiciel COMPODIAL) 

- Liaison à distance avec un autre ordinateur 

- Liaisons locales 

- Interfaçage de périphériques spéciaux V24 
ou boucle de courant (multipoints) 
(crayon-lecteur, horloges pointeuses, 
balances de précision etc...) 
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Ce programme calcule une pou- 
tre en flexion d'après Le schéma 
suivant : 





IL s'agit d'une poutre de Lon- 
‘gueur L, encastrée à une de ses ex- 
trémités CA), et à Laquelle on ap- 
plique une charge P à l'autre ex- 
trémité (B) 





Langage : Basic 
Place mémoire requise : 8 K 


Ecrit pour : CBM Série 3000 





1) Lignes 0 à 16 


Présentation et attente pour 
La suite. 


S0 


Remarque : attente d'une touche par 


POKE 158,0 : vide Le buffer du 

clavier 

WAIT 158,1 : attend l'appui 
d'une touche 


2) Lignes 17 à 34 


Conversation avec l'utilisa- 
teur 


Entrée des données 
1) charge appliquée 
2) Longueur de La poutre 


Puis choix de La section de La 
poutre. 


3) Lignes 35 à 39 


Branchements suivant La sec- 
tion choisie. 

Si il y a un mauvais code, on 
prend par défaut La section ellip- 
tique. 


&) Lignes 40 à 46 

Section elliptique 

Entrée des données petit axe 
grand axe 

Calcul du moment d'inertie 

Branchement à La Ligne 70 


5) Lignes 47 à 53 


Section Rectangulaire 


CAC RT 


Données Hauteur 
Base 
Calcul Moment d'inertie 


Branchement en 70 


6) Lignes 54 à 58 


Section circulaire pleine 
Données Diamètre 
Calcul Moment d'inertie 
Branchement en 70. 


7) Lignes 59 à 65 


Section circulaire creuse 


Données Diamètre extérieur 
Diamètre intérieur 
Calcul Moment d'inertie 


Branchement en 70 


8) Lignes 66 à 69 


Section hexagonale 
Données Largeur 
Calcul Moment d'inertie 


9) Lignes 70 à 73 


Calcul 
maxi. 

Calcul de La contrainte admis- 
sible. 

Appel du sous-programme Mater. 
(Matériaux). : 


10) Ligne 74 


du moment de flexion 


Le pro- 
Les conditions 


Test pour savoir si 
blème posé respecte 
de résistance. 


11) Lignes 75 à 91 
Calcul de La flèche maxi. 
Affichage des résultats. 


12) Lignes 92 à 108 


On peut changer des données. 


13) Lignes 109 à 116 
Calcul de La Force. 
Données Flèche maxi imposée 
longueur de La poutre 
Calcul 
Branchement en 76 pour affi- 
chage. 


14) Lignes 117 à 123 

Calcul de La longueur 

Donnée Nouvelle charge 
Valeur de La flèche 

Calcul 

Branchement en 76 pour affi- 


15) Lignes 124 à 132 
Changement de section 
Données Nouvelle section 


16) Lignes 133 à 148 
Section rectangulaire 
Données Domaine de variation 
de La base 
Calcul 
Branchement en 76 pour affi- 
chage. 


17) Lignes 149 à 164 
Section circulaire creuse 
Données Diamètre ext.Mini 
Diamètre ext.Maxi 
Calcul 
Branchement en 76 pour affi- 
chage. 


18) Ligne 165 à 179 


Section elliptique 


Données Valeur inf. du grand 
axe 
Valeur sup. du grand 
axe 
Calcul 
Branchement en 76 pour affi- 
chage. 


19) Lignes 180 à 199 


SBR Mater 
Données choix du Matériau 


20) Lignes 200 à 204 : 


Problème ne satisfaisant pas 


aux conditions de résistance. 
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3 DEFFHPLH GS INTC GORE +, Si EE 

& INPUT" CHARGE APELIQUEE SES 
1 IFF=ËTHEMPRI NTI: GOTOUZES 

2 INPUT" LONGEUR DE LA FOUTRE SES: L 





! 
IFL= AT HEMPR I MAPS TT EE IUTUEE 














PRINT FIRE ë 
PRINT" MOTCTLLESSSECTIONS FROPOSEES " 
FRINT" à 
CRINTUE # AHGULAIRE L GFEE ]° 
PRINT # ULAIRE FLEIME CL SCIE 7" 
FRINT'E] # LÉRRRESCREUSE L CLS ]j" 
SE FRINTOE # SONMALE L es l° 
31 FRINTUE # QUE L LES ]° 
32 FRINT®E # CODE GE MÜTRE Laûlé CBS. :LHPUTRPE: CIRESRFE 


IFRP#="CUTHENPRINT TT" :GOTOSE 

54 PRINT" 

35 IFRPESURE"THENPE= "RECTANGULAIRE": Pi$= "HAUTEUR": PSS "ENSE": CGOTO4 
36 IFRPE=UCI"THENPE= "CIRCULAIRE FLEIH":P1S="DIAMETRE" : ES": GOTOSd 
37 IFRP#="CC"THEMP#="CIRCULAIRE CREUSE" :Pig="DIAN, EXT":PO#StDIAN. INT" 
35 IFRPÉ=UENUTHENPE= "EN AGONHALE" : F1 S="LARGEUR" : PTE": GCOTOÉE 5 
PÆ="ELIPTIQUE" : PIS "GRAND AXE": PSH="PETIT AXE" 
INPUT" VALEUR DU PETIT AXE  OMBim;Ps 
LFFS=GTHENPRINT "TI" : GOTO4S 

NPUT” VALEUR DU GRAND ASE CiRai: Fi 
=GTHEHPRINT TT: GOTOSE 

RPENPIKPORP 14 
















Hd bout pe et pe EUR OT be pers 


Li 
+ 
à 
= 


VALEUR DE LA HAUTEUR SENS. Fl 
HTHENHPFRI HTTP GOT 
É Se IF: He ci 


Ar DU Tu AU FAT 
Hi] 4 


Éa Ti 





Le 
ki 
KL 
Es 
= 


+ 
TES MR D 

LA 

PALUTS IUSRAE . TA TAPAT pes Je, fe QE 5 FA ue 
IHP ñ R HOT TAMETSERE ST SEL LES 
IFFISSTHENPRINTUTI : OOTOSS 

Das S che pe 4 Rp D ee US 

IERILKRPIAPIRP IP Il ES 





Er = 


LA 


TON Le don Pi tee LD 


mu it D D CO 0 0 © re LA CM Li 
1 Lit it 


A 74 


n UN a mt Ou CN Es din Fu es (TO ja CEE 


CAL 


Pi be MS 


La dés dc CE OO CE QU CE ei ei —} 


— 
sl € 


du 


us. 


LES ee 
+ D 


Ci 


pe ba pe be pe pes be pa il bon pe pre be Eee hu LES LYS Lys Ms LD ton Lit LUN Lit M CU 
=: 


CE ES 


LE 






kA] er LU a EN En Le PR pe EE OC a 


eh CN Le di PE ee 







V=P1ee 
GUTOTE 
IHPUT" VALEUR DU DIAMETRE EST CHSar Fi 
IFFI=STHENPEIHT TT" : GOTOS3 
IHPUT" VALEUR HU DIAMETEE INT DES": FT 
IFFE=GTHENPEIHT TT" : GOTS 1 
ne Po da ue 
GTOTE 
INEUT" VALEUR DE LA LARGEUR GW" ;Fi:F2=û 
IFPFI=GTHENFRIHT TT": GOTOSE 
: RPOXPFIAPIMPIRP I 14 
= E Le es 


ME =PEL 

SI=NFSET. Ne 
GOSUFISG:REN SER MATTER 
Ps EE 
FHSPAHLÆLÆL SET 
FRIHT'UR 
FEIHT" AESULTATE" 

FR HT LL PS LR 
PRINT" DIOHHEES 
ÉRNiRle ee EE 
Élu £ FORLE "FHF<CP) 
FERIHT" Æ LONGUEUR MFHFEL 
FRIHT" & SECTION "FI#"  VÉHFEFIS 
FRIHT" EEE MEHENPEN 
FÉTAT ON RESULTATS" 
IT RE Me UT NS 
FRIHT"  MATERIAL: ME 
RD RULES ROME Eee NUE" 
FEIHT" EP=NREU HSMMS 
MF=PEL:PEINT" MOMENT HASISMPHE CNE GS CHEN" 
PRINT" FLECHE HASI="FHECFHSS MIN 
EN  — nee À 
PEINT'eUOULEZ VOUS CHANGEZ DES DÛHHEES CO<H3 #" 
EEE 
GETRPE : IFRPFEZUUTHENSS 
IFRFESMHUTHENPET HT "TIRE" : EHT 
FE Î HT ii 22 ue nt 
PÉINT" CHOIE FEUFUSE 
ue FRE TS re) 

FEIHT" £ CALCUL DE LA SHIRCER 

FFATEUTES € CALCUL DE LA SÆOINGLIEURA 

RAT, # CALCUL DE LA SSÆCTIONE 

FEIHT" & CODE DE VOTÉE CHOIX 7 

GETRPE: IFRFHS=UOTHEHIES 

IFRP#="FUTHENHI163 

IFEFH="LUTHENIIT 

IFRFHZ"ENTHENIZ4 

GOTOIEA 

IHPUT" FLECHE MASI IMNPOSEE BEBE": CE 
IFER=HTHEHI GS 

IHPUT"# LONGUEUR DE LA POUTRE ARE"; Zi 
IFSIS=GTHENI II 

ES iElHE 








25= LHRIRERT ES 


Fe CIE Le Ci Fe des VEN Li 


CA Pme ee 





FHSSE  PaIE Let MPFSLIL : GÛTOFÉ : RE 


Co 


me feue fout fe use fete 
nu Fe fin tes ba tee 
ht je LE QU = 


et Os ed Po ee Li 


EU 


en et be bete ect ee bete pe bete but pete jou 


Hs dt ot a Do at fat an fat Eat a Pa 


Los 


D A TT TT TP 0 Te CP ON CA 
Ce I pe a Pet ee 1 Or Ut ef 67 A ee Fe es mi ON OO 


DS PRO PEN EE e LA CNI D OR LE PRE dE LE See et ASE 


IHPUT CIN HOUVELLE CHARGE SSI" : LE 


& IFSG=GTHENPEINTETT GOT I 


INPUT) VALEUR IDE LA FLECHE SRB": 1 
IFEI=GTHEMPRTAT TT" : GOTOI 13 

Lee] KEREX I. EE 

Lesstil ss 

FHSSI Ps: GOTOrE : REN AFFICHAGE 
FRINT'OIRN VOTRE SECTION EST °F# 

PRINT CODE SRES CCI CCS SEX LE "; 


 IHPUIT" ALT LpRsEs 


IFRS= HU THENPRINT "TI" : GOTO12S 


 IFHF="RE" THENISS 


IFHF="CI"THENI45 

IFAF="CCITHENISS 

IFHF="EX"THENISS 

IFAF="EL'THENIS 

PRINT" DOMAINE DE VARIATION LE LA EHSE" 
IHPUT'" VALEUR IHF SRB": INF 
IFIHF=STHENPETHT TI": GOT: 

INPUT YALELUR SUP GES": SE 
IFSUP=GTHENPERIHT TT: GOTOISE 

PRIHT'CEM F ESULTRATS 5 

BRIE SONe co 

PRIATIEASE"; + HAUTEUR" 

FRIHT" PE 1 ot 





a 
5 HISPALELRLRACERETRE Là: HeH Te 1/25 


FRIHTI, ; FHFCH5 
HEXT 


 FI=SUF:PÈ=H 
F P= "RECTANGULAIRE": F1#= "BASE": Fa$= "HAUTEUR" 
5 PRIHT"UHE TOUCHE SUP: HAITISS, 1 :POREISS. 4: GOÜTOrFÉ 


PE="CIRCULAIRE PLEIN" :PL#="DIAMETRE EXT": Page" :Ppoeg 
DA =PHLALALKES CORERFHKP 1) 1222410. 25 
1=2: GÜTOTÉ 


e PRINT" VARIATION DU DIAMETRE" 
: INPUT" EXT MIHI GASBl" : IHF 


IFINF=GTHENPRINT TI": GOTO1S3 

IHPUT EXT MAXI GESNI";SUP 
IFSUP=GTHENPR INT "TI" :GOTO15S 

PRINT'DIAMETRE EXT". "DIAMETRE INT" 

Rd Ernie SI) FUTURES 

FORIG=INFTOSUR 

P="CIRCULAIRE CREUSE" P1#="DIAMTRE EXT" :F2#="DIAMETRE INT" 
DAS LON TON IDR CCPHLALALREADESHEMFMAE LD) : ZSAES (24) 7, 25 :P1S10:P2=Z 

PRIHTP1. 

HEXT 

PRINT"UHE TOUCHE SVP" :MAITISS, 1 :POKE1SS, à: GOTOTE 

= PRLLELEL dd LEHEMFIPRSQR C0 0 :Pi=Ta 1. 25: Pé="ENAGONMALE" :P1£= 
Lac Frs" EL FE ee C GOT Ë 154 LREGE] LIF*: CE L 
PRINT"DOMAIHE DE WARIATIOH DE GRAND A#E" 

PS='ELIPTIQUE" :P1$= "GRAND À ME": POH="PETIT ANE" 

INPUT" 'ALEUR INF. GSM"; INF 
LFIHE=GTHENPRINT "TI" : GOTO163 

INPUT" VALEUR SUP. GR; SUP 

IFSUP=GTHEHPRIHT "TT" : GOTO 71 

PRINT'GRAND AKE".."BETIT AXE" 

FBEIHT" 54 mes, er sl 

FORIG=IHFTOSUE 

ZSSPALELELHI SC DRERFNHPLKIO) :PiSIG:Pa=ZI TC 1/5) 


PACE CRT. 
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FRINTPI, FE 
HEXT 
FRINT'UHE TOUCHE SYP":UAITISE. 1 :POKE1SS, 8: GOTOTE 
PS DR Vie Ne Lien 
PRINT"! CODE 1 MATERIAUI VOUHG | EP I 

PRINT + ———+—— 
PRINTMI 1 Ï ACIER (219908 1185 | 
PRET —— 
PRINT"! 2 I FONTE  li80G8@ | 55 | 
SR 
PRINT] 3 | CUIVRE 116668 | 54 | 
ES 
PRINT") 4 | ERONZE | 59608 | 98 ! 
BE I à. IT Loge er ame RE L 


ENT moi — 


a Fe ps Es Lin A 


LH Er 











ù ME En Ts 


bb bete po eme pes bent oct pod fe pes pen pou bé ps 


1 ga dia LÉ EN Cia Et da 











te! 


31 FEIHTMMCOLE DE VOTRE CHOI#" 

32 GETRPE: IFRPHESNNTHENISE 

F3 A=YALERPES 

54 IFALIORAATHENISE 

35 DNAGOTOISS, 1397, 195,193 

FE MH= "ACIER" En, ES :EP=i6S:RETURH 
3 ME ee EsiES:RP=SS : RETUEH 

5 


='CUIVRE" :Ez1.1ES:ERF=54:RETUEM 
Me RRONCE" E=, SES: RP=SE : RETUEH 
EINT'OSM LE FRCELENE FOSE HE SATISFAIT 


Le Fa Lt Ci LA JE 


St PT (A LE 
se CRE LR 1. 


Een PP Pen Page Pi Pen fan Pen Pas Pa Pr PU mue bon pes ps pos bo pet ut ue 


Î PRIHT" PAS lé CONDITIONS DE 
Se FRIHT" -RESISTANLE. 
ES PRINT" AMMERTEE" 
ÉAISTOR 
GS RE 
Ge REN ÊLs ERUGEASSOU J, 
&F FE D me | 
GS REN LE se'ig"1SEt l 
G3 KE 
if REN FÉE GÉTETS 
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Avec ces "modules d'animation" le CBM 
n'a rien à envier au 64 ! 





Une image-écran se défi- 
nit par une matrice de 25 Lignes de 
40 colonnes soient 1000 points". 
La mémoire est située dans un CBM 
3000 entre 32768 et 33767. 


A tout moment, on peut imposer 
Le contenu d'une case-écran par un 
POKE x, y 


= adresse de La case 
= code-écran du symbole 


Comment déterminer simplement 
tiodrecse d'une case-écran ? 


Adresse = 32768 +(40x(Ligne-1)) + 
(Colonne-1) 
avec 
1 <= Ligne «<= 25 
1 (= colonne (= 40 


A partir de ces éléments, nous 
voyons qu'il est relativement faci- 
Le de dessiner à L'écran d'un CBM. 
Cependant l'emploi du BASIC risque 
d'être pénalisant pour l'anima- 
tion du dessin. 





Pour réaliser de l'animation 
sur CBM, introduisons La notion de 
module d'animation que nous appele- 
rons pour simplification Le MODAN. 


Le Modan est en fait une 


86 


grille de 9 [Lignes de 8 colonnes 
(matrice 9 x 8). 


bit no 8 bit no 1 
i poids 210 





Pourquoi 8 colonnes? parce que 
cela revient à manipuler simplement 
un octet pour définir une ligne de 
notre modan. Volontairement, nous 
nous sommes limités à 9 [Lignes 
(maximum) . 


A chaque bit de l'octet d'une 
Ligne du modan, affectons un poids 
de 270 (bit no 1) à 217 (pour Le 
bit no 8). Si une case du modan 
doit être noircie, elle sera 
affectée du poids binaire corres- 
pondant alors que si elle reste 
blanche, elle sera affectée de 0. 
Un octet du modan sera défini par 
La somme des poids binaires des 
cases noircies. 


Exemple : Création d'un bonhomme 
(idée d'Alan Watson parue dans 
Compute numéro 16 de septembre 81) 


Er D 


1 : O +64 +32 +16 +8 +4 +2 +0 =126 Nous obtenons bien notre bon- 

2 : DO +64 +0 +16 +8 +0 +2 +0 = 90 homme comme prévu à L'écran. 

3 : O +64 +0 +0 +0 +0 +2 +0 = 66 Tentons maintenant à partir de ce 

4 : DO +0 +32 +16 +8 +4 +0 +0 = 60 programme BASIC une animation de 

5 :128 +64 +0 +16 +8 +0 +2 +1 =219 notre bonhomme (exécution d'un sau- 
! 6 :128 +0 +32 +16 +8 +4 +0 +1 =189 tillement d'une jambe à l'autre). 

7 : D +64 +32 +0 +0 +4 +2 +0 =102 

8 : ‘e L : 5 Pour ce faire, représentons 

9 :128 +64 +32 +0 +0 +4 +2 +1 =231 Les 3 modans constituant notre ani- 
à mation. 

Nous voyons qu'un ‘bonhomme 


peut être défini simplement à 
l'aide de 9 octets. Pour Le posi- 
tionner sur l'écran du CBM, il suf- 


Numéro 1 








fira de donner l'adresse de La pre- LEZ] ] 126 
mière case du modan (case de La lLi- | 4 EZZ FA | 90 
gne 1 et de La colonne 1 du modan). DEN 
LL EE L_ _] 60 

Nous allons afficher notre CAA ELA, ZA 219 
bonhomme à L'aide d'un programme CA __EZLCZZZÀ A 189 
BASIC. Ce programme est volontaire- EC LEZ | 102 
ment alourdi pour expliciter La LEA LEZ, ] 102 
façon de créer Le dessin. CAZALA | _ CLEA 231 





LL SEP RE SRE DEEE DRE ME ME DRE DRE DE EME EE DRE DE EE DIE DRE DEEE ME GE 

 FREFÆ AFFICHAGE EASIC CCUH MODAH % 

12 FEM# COPTEIGHT ACHESEOIS APE 

14 FEMX # 

15 FEMX DESSIN OCE ECMHMONME # 

lé FEr#% ALAH MUATSOH REVUE COMPUTE  %# 

F FEM# HUMERO 16 JUIH 1381 # 

15 FEMX # 

LE FREIN AE ARE DEEE DE DEEE HE DE DEEE DE DRE ME AE EE EE EEE 

SE : 

&l sIHÉS= lé: QU = dE 

es Ra H ESEMFLE OE MODAN MsFRIHT®" $ BONHOMME CE WATSOH " 
FJORE 

Ed LisFsCOR FT :REN POSITION ECRAH LIGHE-COLONHE 

En ED=SS FES +de LI 133+6C0-10 :RENM CALCUL ADRESSE DEPART MODEN 


on e 


C6 TS CN Re Ci Pô re Ci M CG 0 


ù où Où Oo Où do Où Lo où Co PO Pa Po Re 


HOX=S :REM HEBRE OCTETS OU DESSIH 
GOSUE Zd 

GOTOUZS :REM BOUCLAGE INEIHI 
EE CCTETS OU DESSIH 
DATA 126.96,66,.68,2193. 
FER SF AFFICHAGE 
FÜORI=1TONOS:RENM BOUCLE SUR HBRE OCTETS 
FERDAXETS :REM LECTURE OCTET 
FÜRISGTOS:REM BOUCLE SUR & EBITS OCTET 
ÉRSINTÉMAE TI SCT Tnt eREM CALCUL OIVYISIOHN OCTET FAR FOIS 


155% 


Eole 
ERA] 
HA] 
5} 
bte 
EE] 
F3 
[LAN] 
sl 
be 


CEFIHISSANT DESSIH 


39 IFRKSGTHENPFOÉEED+JI,.E% :B0TOQS:RENM NUL --% AFFICHE ELAHC = 
| 46 POÉEED+JI,IMÈ:REM MON HUL —-35 AFFICHE FAVE IHVERSE 

HT ARE IAE TEST Th: REM SOUSTRACTION À OCTET OU FOIS 

42 MEXT J EDR ENHENE EMEA 

45 EDSED+QUX:RENM CHANGEMENT DE LIGHE ECFAH 

4 MEXT I 

45 RETUEH 
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di 
12 


1 Ph Pen ph fi Pin Pi Pi Pi Dite 
co 4 Ou ON Re 6 D ee 10 C0 


Pie du Où Ji OM ON E di Pi ee Gi 


BE dB dû 0 où do 0 Où Gi 0 Où Qi Fi Pi FE 


Qo 
(ee) 


Nous voyons que pour animer Le 








Numéro 2 
bonhomme, il suffit de 3 modans et 

dans ces 3 modans, seuls Les 2 der- 
CEZZEZZZZZZAÀ | 126 niers octets varient : 
TEZ EE EZA | 90 
LOIR EMONNEZ00 Le 66 Notre programme aura La 
| | ZZZZZZ22, ,L_ |] 60 structure suivante : 
LL LEZ 219 
LA _VZCLLLILA, 2 189 
ne) 10 Modan numéro 1 
ZAZLA. | _EZZ | 230 
Wan Modan numéro 2 










Modan numéro 3 









Numéro 3 

CEA | 126 Les modans numéro 2 et numéro 
TE EE A À 90 3 n'auront que deux octets de défi- 
Lo AMNN ee nition puisque Le reste de l'image 
[1 ZZZZZZA | 60 du modan est inchangé. 
ZA. ZA (ZA 219 

ZA | EZA | A 189 Nous voyons que Le programme 
CEA LEZ 102 BASIC ci-dessous conduit bien aux 
CEA LT EEE 105 images prévues, mais L'animation 
LLCLLCONN EEE n'a pas [L'effet escompté, ce qui 





. est dû à La Lenteur de BASIC. 
FLE flat 2h 2h 2h ee 2 EE EE EEE DE EE DE EEE EE CE 


FErR# AHIMATION BASIC OÙ MOCAH # 
EE COFHRIGHT A.HESECUIS GPS # 
REF # 
FEI DESSIN CE BONHOMME # 
EErR ALAN HATESOH REVUE COMPUTE  # 
FETE HUMERC 16 JUIH 1381 # 
F'ETI# # 
FLE FRE 2 3h 2 RER RE RE EME EE EEE EE EEE EEE EE EE EEE 


EX=SS : INA= 166 OS 4 6 

FEIHT"'O 4 ANIMATION CE MOCAN  ":PRINT" 4  BOMHHOMME CE HATSOM © 
LisrsC0eT EDR FES+E Gé LI 1334600153 HET 
RERCRS 3 IFRS MI "THEMES :ELSEGOSUESS 

RESTORE 
Li=id4:COSF:E0SSETÉéS+E AE LI 10 346001 02 H0ÉSE 
RERACRE 3: IFRS UMENTHEHES : ELSEGOSUESS 

RESTORE 
Li=ié:CO=7:EC=S2 TES + 46e LIL 0+6C0- 10 :H0SE 
RERCAS : IFAHES UNS "THENSL ELSEGOSUESS 

GOTOZE 


Cyr) 
ra 


DANANMIMEE SAS EL ETS MES DES NES es 
OATA ME.SSE Fr 
CATA MS.IHS. ZE 


FEMNSSAENEARENCAAGE 

FORI=1TONCE 8 RERO EI 5 FORTS GTOS ske TNTERARETIMCETEE 
IFRRSATHENPFOREEC+T EX 8 GOTOHZ 2 ELSEFOREECE+T, LH SAR T 
HET sECISECHALRE HET :RETUEH | 






NA RTE 





Aussi, allons nous écrire La partie 
d'affichage du modan en langage ma- 
chine. Ce sous-programme sera ap- 
pelé depuis BASIC par Le biais de 
La fonction CALL disponible avec 
Edex 2.0. 


Nous allons expliciter quelque 
peu La fonction CALL (D'après La 
notice d'Edex 2.0 distribuée par 
Procep). 


La fonction CALL permet L'ap- 
pel d'un sous-programme écrit en 
langage machine commençant à une 
adresse À (exprimée en décimal) et 
ce, -en passant des variables à La 
manière de La fonction USR. 


La puissance supplémentaire 
apportée par CALL est que ces va- 
riables peuvent être réelles, 
entières ou des chaînes de carac- 
tères et qu'il est possible dans un 
même appel à un sous-programme de 
transférer jusqu'à 16 variables. 


Syntaxe: CALL A, P1, P2,...P16 


où Les Pi désignent Le nom des va- 
riables de type réel (CA,Z...) de 
type entier (CA%, Z4%...) où chaïine 
caractères CAS, 2Z$...) 


Au moment de l'exécution de 
CALL, Les descriptions des varia- 
bles nommées dans Le CALL sont 
transférées dans Le buffer du Basic 
du CBM à partir des adresses $0210. 
Ces descriptions sont faites par 
blocs de 4 octets. La première va- 
riable est décrite de $0210 à $0213 
La seconde de $0214 à $0217,... 


Nous allons travailler unique- 
ment sur des variables entières. 
Dans ce cas Les 4 octets défi- 
nissent : 


— Le type de variable (Îer octet) 
$80 pour variable entière 


- indifférent pour Le 2ème octet 
dans Le cas d'une variable entière 


- La valeur signée sur 2 octets 


(3ème et 4ème octet) de La variable 
entière. 


Attention cette valeur est 
exprimée sous La forme poids fort- 
poids faible représentation clas- 


rogr 


imposition Ligne et 
colonne début Modan 


charge Les octets du 
modan dans Acc. 
Décale l'octet d'un 
cran vers La gauche 


octet = octet décalé 
dans mémoire RESU 


Bit décalé = 0 


valeur à afficher 
(POKE): 160 pour 
espace inversé 


Valeur à afficher à 
L'écran CPOKE): 32 (pour 
un espace) 


Impression à l'écran 
du bit de l'octet 


Les 8 bits de l'octet 
sont-ils affichés ? 


changement de ligne 


A 


ecran 


A l'adresse du 1er octet 
du modan, on ajoute +4 
puisque Les octets sont 
définis de 4 en #4 


Tous Les octets du modan 
sont-ils affichés ? 


Contes 








Listing du sous-programme Xi%: valeur du ième octet dé- 
MODANIM finissant Le modan (nous 


aurons 9 valeurs maxi.). 
Avant de rentrer Le programme 


ou de Le Lancer, faire SYS 46000 Les variables passées par CALL 
pour activer Edex 2.0. seront définies aux adresses 
suivantes : 


Dans Le programme BASIC, L'ap- LIx ——) $0213 
pel se fera comme suit: COX —— $0217 
NOX —— 50218 
CALL 826,1i%,C0%,N0%,X1%,X2%,..,X9% X14 ——) $021F 
X2%X ——} $0223 
826: -adresse du S/P en langage X3%4 — $0227 
machine (dans buffer ma- à 
gnétophone no 2). à 
LIi%: ligne de départ du modan. X9%x — 5$023F 
CO%: colonne départ du modan. 
N0O%: nombre d'octets définis- 
sant Le modan. André HESBOIS 


À 1 REIMIRE MEME ME MEME DRE DRE EDR DEEE HER AE ME ME EEE EE EEE 


12 FET# # 
5 REMX FECGRANMME : ANIM ECRIT EH # 
1 FRET ÉHSDEMS EL SOUS # 
15 FET# EUE* 20,6 # 
16 RErX% COPTEIGHT : ANORE HESEOTS # 
FETIS TUTÉBENTVSES # 

5 FEMX # 
a 


15 
15 FE M A EEE EEE 
SÉ 3 

Zi FEM CHOGT SF LANGAGE MACHIME 

22 REAOL 

25 REAOAE : IFAE= "AU THENSS 

ed AEMSCCAEI-AE LES ÉRIGHTÉLAE. 1310-48: CELEMNCAE 

DS Het Pc ES ee Cet ke LE CAPE CAS 0 1 : POKEL..Hi:LeL+1 :GOTOES 








LD 

27 REM S°F LANGAGE MACHIHE 
Da 1: 
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Au catalogue : 


UTIL-VIC-KIT de H. LE MARCHAND, un programme qui ajoute des fonctions au BASIC 
de votre VIC: 
SET (établit Les couleurs écran et cadre) CLEAN (vide L'écran) 
PLOT (trace un point en haute résolution) JOYO (Lit Les JOYSTICKS) 
LOOK (recherche une chaîne) KEY (affecte une touche de fonction) 
PAUSE et bien d'autres. 
En bref, un résumé de Programmer's Aid et Super Expander pour 80 F. 


ASSEMBLEUR UNIVERSEL de J. RENAUD 
Un éditeur-assembleur complet. Traitement des opérantes symboliques, 
sauvegarde de votre texte sur disque ou cassette. 
Pour tous Les COMMODORE (VIC à partir de 5,5 K) et ORIC; ATARI en 
préparation 
DAS MISUNTe 


BASICOIS de H. LE MARCHAND, (pour VIC de base ou étendu) 
Si l'anglais est un obstacle à votre compréhension de l'informatique, 
BASICOIS est fait pour vous. Prix 150 F. 
MOMSACÉESA- M ABS METZ ACODE  ATN/ACARS MFERME NERF CMD CONT COS: 
DONNEES, DEF, DIM, EXP, SI, DEMANDE, ENT, FN, POUR, LBR, FRAPPE, APPEL, VA- 
AU, GAUS, LONG, SOIT, VOIR, RAPPEL, LOG, MI$, VIDE, REPETE, NON, SUR, 
OUVRE, OÙ, MEM, METS, POS, AFFICHE, LIS, REM, REPRENDS, RETOUR, DROITES, 
ALE, FAIS, RANGE, SGN, SIN, EXP, RCN, PAS, HALTE, SEQ$, SYS, TAB, TAN, 
ALORS, JUSQUE, USR, VAL, VERIFIE, ATTEND . 


TELECRAN de D.J. DAVID 
(Pour VIC, 64, ATARI; ORIC en préparation) 
Le jeu bien connu de TELECRAN, mais Là, Le trait peut être interrompu et 
il y a des traits diagonaux. Votre dessin peut être sauvegardé sur disque 
OÙUMSUrAcaSsette. PRIX MSUNES 


BON DE COMMANDE 


A envoyer à SEDERMI 28,rue Vica d'Azir 75010 PARIS 
NOM Sn tm evasesee st TOOL BEL 000 essences 
ATRES SCENE amer Sie oues cte no000d 0000000 = eee ects 


sassssasse aunensusanssssesesseseussessssssrensmsesasesseuscensvse 


Je désire Les cassettes ( entourer ) 


SL UNIT ESC AK NTIC ESAK VERRE SAR A ER" 80 F 
. EDASM UNIV CBM VIC 64 
ORIC ATARI (délai) CURE 
. BASICOIS VIC s-1D0%E 
. TELECRAN VIC 64 
ATARI ORLEACGELAND Er NE... 80 F 
TONNES Se = F 


Règlement joint obligatoirement 


PAR ET 





ALICE 


AMNEVILLE- LOISIRS INFORMATIQUES CLUB 


| 
Alice vient de naître et accueille tous Les amateurs de micro-infor- 
matique ,qu'ils possèdent ou non un ordinateur et quelle que soit La marque 
de celui-ci. 
Le club met des "ORIC'"' à La disposition des membres qui Le souhaitent. 
| Les réunions se tiennent Le mercredi à 19 heures à La Maison des Jeunes | 
| d'Amnéville (Moselle). 





Le CLUB MICRO du Collège Pierre DUBOIS équipé d'un beau, mais unique CBM 
4032 cherche contacts avec autres Collèges pour échanger des didacticiels ou 
bien d'autres programmes. 


Collège Pierre DUBOIS 71 rue Victor Boissel 53000 LAVAL 


CLUB VIC 20-Commodore 64 


Créé à compter de septembre 1983 par Léon BRITAN. 


20, rue Léo Desjardins 93250 VILLEMOMBLE 
Tél 2882559; 
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Notre Confrère ‘Traitement de 
Textes" 35 rue St. Georges 75009 


PARIS a décrit dans son n 28 de 
juin 83 sa propre expérience d'‘'uti- 
Lisation de TRAITEXT sur CBM 8000 
associé à un système de photocompo- 
sition. Lecteurs intéressés deman- 
dez-leur des détails. Le fait 
qu'une revue spécialisée dans Le 
traitement de textes ait choisi Le 
CSM pour sa propre fabrication 
devrait plaider en faveur du CBM et 
de TRAITEXT. 


Banc d'essai du 64 dans 
"L'Ordinateur Individuel" n° 50. 


GUIDE DE L'ORIC 
BAYVEJIEL ) 


(Philippe 
EDIMICRO 


N'achetez pas ce Livre ! Il ne 
contient pas un seul renseignement 
qui ne se trouve aussi dans La no- 
tice accompagnant L'ORIC. Or celle- 
ci est maintenant traduite en fran- 
çais et vous devez l'obtenir gra- 
tuitement. 


Notez que Le nom de L'auteur 
change entre La couverture et l'in- 
térieur (Bayjeviel), ce qui n'est 
pas étonnant vu que ce nom recouvre 
en fait quatre co-auteurs. On est 
effaré qu'il ait fallu se mettre à 
quatre pour un tel résultat ! 


Exemples de fautes techniques 
et d'imprécisions énormes rencon- 
trées: 


p.6 K=1000 (au lieu de 1024) 


p.8 La 2ème alimentation sert à 
“annuler Les parasites du télé- 
viseur''!!!11 Apprenez, MM. Les  Au- 
teurs qu'elle sert plutôt à faire 
commuter La prise Péritel en mode 
vidéo. 


p.20 mauvaise interprétation du 
fonctionnement de l'éditeur 


p.89 ‘'La boucle REPEAT UNTIL a 
Les mêmes propriétés que La boucle 
EORSANEXTERIEI 


p.111 comparaison de PLOT x,y,''H"! 
et derePLOTX y "H Les Auteurs 
croient que La deuxième imprime 


un "'H' invisible! 


p.163 ‘à La place de A$ on peut 
mettre ... un nombre..." 
et bien d'autres... 


IL faut plus de rigueur lors- 
qu'on prétend écrire pour Les débu- 
tants. Il faut vérifier Les exem- 
ples que l'on donne ; or il n'est 
pas sûr que Les Auteurs aîent beau- 
coup regardé l'affichage d'un Oric 
puisque Le message ‘'Ready" est cité 
en majuscules ! 


Conclusion Si vous voulez tirer 
pus de Votre "Onic lISez les 
Commode et attendez La parution 


d'autres livres. 


Pierre-Etienne THALBERG 
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EDITIONS DU PSL 


la DFE du 


1. PÉRIPHÉRIQUES ET 
GESTION DEE 


3 LIVRES 


VOTRE 
VIC 


La découverte du VIC 

par Daniel-Jean David 

Ce livre comprend essentiellement une présentation progressive du langage Basic, fait 
découvrir les divers champs d'application de l'ordinateur individuel VIC. Il aborde 
Spécialement les points forts de ce PSI (Petit Système Individuel) : graphiques, sons, 
couleurs. Série verte - Format : 14,5 x 21. 

176 pages - 82,00 FF / 635,00 FB 
































La pratique du VIC 

Tome 1 - par Daniel-Jean David 

Cet ouvrage, qui fait suite à ‘‘la découverte du VIC”’ (initiation au Basic), ouvre 
les portes des applications faisant appel aux fichiers (cassettes, disquettes) à 
l'impression et à l’intérface RS 232. || comporte également de nombreux exem- 
ples et exercices avec solution. Série bleue - Format : 14,5 x 21. 

176 pages - 82,00 FF / 635,00 FB 





Clefs pour le VIC 

par Daniel-Jean David 

Un livre destiné à se trouver en permanence à côté de votre VIC tandis que vous pro- 
grammez? Un livre qui vous fait accéder rapidement à toutes les informations de réfé- 
rence : syntaxe des commandes, codes caractères, messages d'erreurs, codes 
machine, brochages, bonnes adresses ? 

Un livre qui se termine par un recueil de 40 “trucs” utiles, les “Comment... ?” Le livre 
qui vous évitera d'aller glaner de ci de là tous ces renseignements existe. C'est ‘Clefs 
pour le VIC”. Format : 14,5 x 21. 

120 pages - 82,00 FF / 635,00 FB 

















P.S.I. DIFFUSION Envoyer ce bon DESIGNATION 
BP 86 - 77402 Lagny-s/Marne Cedex accompagné 
Téléphone (6) 006.44.35 P-S.I DIFFUSION Ke 
ou, pour la Belgique et 
P.S.I. BENELUX le Luxembourg, à © 
5, avenue de la Ferme Rose P.S.I. BENELUX Rem 
TEarales par avion ajouter 8 FF (75 FB) par livre. 
Téléphone (2) 345.08.50 
au Canada en Suisse en Espagne NOM PRENOM 
SCE Inc. CRISPA P.S.I. Iberica 
3449 rue Saint-Denis 16, avenue de Beaumont Ferraz11 Madrid8 rue N° 
Montréal Québec H 2X3 L 1 1700 Fribourg Tél. : (1) 247.30.00 
Tél. : (514) 843.76.63 Tél. : (037) 24.43.76 Code post. L_1 1 1 1} Ville 

















CONNAISSEZ VOTRE NUMERO D'ABONNEMENT : 


L'étiquette d'envoi de votre numéro porte, en tête, un numéro très 
important. C'est, en fait, par lui que nous vous connaissons. Gardez ce 
numéro, il vous est indispensable dans vos relations avec nous. IL est utile 
de Le rappeler dans toutes circonstances et c'est indispensable pour : 

- réabonnement, 

- changement d'adresse, 

- services réservés aux abonnés (Ex: photocopies), 

- réclamations 


REABONNEMENT : 
N'oubliez pas de rappeler votre numéro. Cela vous évitera de recevoir une 
Lettre de relance alors que vous venez de vous réabonner. 


CHANGEMENT D'ADRESSE EN COURS D'ABONNEMENT : 

IL est impératif de citer votre numéro, sinon La prise en compte de votre 
changement risque d'être retardée, donc un exemplaire risque de vous être 
envoyé à votre ancienne adresse. D'autre part, il faut maintenant joindre 10 F 
en timbres à tout changement d'adresse. 


RECLAMATIONS : 
Toute réclamation pour numéro non parvenu doit rappeler votre numéro 


‘d'abonné. Elle doit être formulée par Lettre non recommandée et pas par 


téléphone ni par visite au 28 rue Vicq d'Azir, où il n'y a AUCUN numéro. 


PHOTOCOPIES : 

La Commode va mettre en place différents services réservés aux abonnés 
(Nous pensons même à un service de consultation technique). 

Dès maintenant, nous fournissons photocopies d'articles de numéros 
épuisés. 

Tarif : 10 F par article + 2 F par page. Utilisez Le bon de commande ci- 
dessous : 


BON DE COMMANDE DE PHOTOCOPIES : 


à envoyer à LA COMMODE 28, rue Vicq d'Azir, 75010 PARIS 


NOM C3 soenssssvtvessseunressessssassessvessesssce esse... 
Adresse a sessassssssesesassesssesecessve sessssessvasesvsesece. 
numéro : pages : titre : 


Numéro d'abonné .....ssmussossns date cocososn....signature : 
(obligatoire) 
Règlement (10 F par article + 2 F par page), joint obligatoirement. 


AL TRES SAP: 





at puni 





lauID2 3334 
l'fLoRDImATEURR 
INDIVIDUEL} 


AU SOMMAIRE 


e Panorama des ordinateurs valant 
jusqu'à 60 000 F (200 matériels) 


e Tableau récapitulatif de tous les Oll. 
dans plusieurs configurations 


e Panorama des imprimantes pour 


ordinateur individuel (plus de 100 matériels) 
e Réactualisation de bancs d'essai 


de 50 matériels parus dans L'O.. 


e Revue des bancs d'essai de 52 logiciels 
parus dans L'O.. depuis le n° 34 


e Annuaire des fournisseurs et des clubs : 
plus de 1500 adresses 

e Le point sur les nouveautés parues 

depuis l'été 82 

e Dictionnaire de l'informatique individuelle 
e Et une série d'articles pour vous “guider 


sur le chemin de votre informatisation 
individuelle 


à partir 
du 12 septembre 1983 
35 FF 
chez votre marchand 
de journaux 


Pour recevoir, chez vous le 

Guide 83-84 dès sa parution, il vous 

suffit d'envoyer vos nom et adresse 

ainsi qu'un chèque de 35FF à 
L'ORDINATEUR INDIVIDUEL (GUIDE 83-84) 


39, rue de la Grange-aux-Belles 
75484 Paris Cedex 10 


Üne réduction de 5FF est accordée aux abonnés 
sur envoi de la dernière étiquette d'expédition 


Rédaction 


Rédacteur en chef: 
Daniel TRECOURT 





Rédacteur en chef adjoint : 
Marc VAN CRAEYNEST 
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Publicité : 
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Bulletin d'abonnement 


À envoyer à La Commode 
28, rue Vicq d'Azir - 75010 PARIS 


Je désire m'abonner à la Commode (1 an, 4 numéros) à partir du numéro 


NOM. ; PRÉNOM : 
Adresse : 


Signature 


Règlement 150 F à l'ordre de SEDERMI : Réabonnement 
O ccP O CB O ESPECES Indiquez si possible votre 
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(étranger : 160 FF supplément avion : 40 FF ) 
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SPID VOUS OFFRE 
SA L°SELECTION DE: 
LOGICIELS. 


Une sélection mondiale de 392 programmes 
pour : APPLE - ATARI - IBM - CBM -TRS - en PCs 
EPSON - Sinclair ZX 81 et 

ORIC 1 - Victor Lambda | = ” 
Dress 


JCR,DES MICRO-ORDINATEURS 
PROFESSIONNEL ET GRAND PUBLIC. 


#”commodore 





CBM 4000 ORIC 1 COMMODORE VIC 20 

Système clavier monobloc 16 ou 32K. Un ordinateur pour tous de 16 à 48K Un vrai micro-ordinateur puissant et 
Processeur 6502. Bus IEEE. oct. RAM. évolutif idéal pour l'initiation comme 
Version 16 K. 16 couleurs en graphisme haute résolu- pour la pratique de la programmation. 
CBM 8000 tion. 16 couleurs RAM 3,5 K. 


Synthétiseur de son et interface paral- 
Système clavier écran monobloc. lèle incorporés d'origine 
Bus IÉÉE. Clavier Azerty. 48 K + manuel français ACCESSOIRES VIC GE) 


- et cordon Peritel. 
PROMOTION Cartouche RAM 1110. 8 Ko. 


rome PUPPDE Cartouche RAM 1111. 16 «SE 














Lu raison des fluctuations monétaires, ces prix sont susceptibles d'être modifiés sans préavis. Nous consulter pour confirmation. 
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